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TODO SOBRE LOS UDG. Conocer el 
modo de almacenamiento gráfi- 
co en el Spectrum es imprescindi- 
ble para empezar a hacer un jue- 
go. 



CONTROL DE SPRITES. Por fin una 
potente rutina que mueve gráfi- 
cos, crea animacián y te permite 
desplazar por pantalla simultá- 
neamente distintos tipos de figu- 
ras. 



MOVIMIENTO Y TECLADO. Todo lo 

que necesitas saber para poder 
utilizar el joy stick o cualquier ti- 
po de combinación de teclas en 
tus juegos. Y, además, con la po- 
sibilidad adicional de crear dis- 
tintas secuencias de animación 
para tus personajes. 



DETECCION DE CHOQUES. Ahora 

Ruedes definir de un modo senci- 
o todos los obstáculos y elemen- 
tos hostiles de tus juegos, me- 
diante una rutina capaz de detec- 
tar cualquier tipo de choque o 
disparo. 



TÉCNICAS DE MAPEADO. Crear los 
mapas y decorados de tus juegos 
será a partir de ahora una tarea 
casi rutinaria. 



GUÍA DE UTILIDADES GRAFICAS. 

Una completa guía de herra- 
mientas de programación para 
trabajar con los gráficos del 
Spectrum. 



TODO 
SOBRE LOS 

Los UDG o gráficos 
definidos por el 
usario, son unos 
caracteres similares a 
los del alfabeto al 
conectar el 
ordenador. Gracias a 

unas pequeñas 
operaciones podemos 

llegar a crear 
cualquier carácter o 
gráfico que nos sea 
de utilidad. Para 
conocer esta 
interesante 
posibilidad de 
nuestro ordenador, os 
explicamos con 
ejemplos cómo se 
realiza paso a paso. 

CÓMO SE CREA UN UDG 

Un carácter del ordena- 
dor es una cuadrícula de 
ocho por ocho pixels o pun- 
tos. Para diseñar el gráfico 
necesitamos unas cuadricu- 
las como la que se muestra 
en la figura 1. 

Sobre esta cuadricula 
procederemos a rellenar los 
cuadros con un lápiz hasta 
obtener la forma deseada. 
En la figura 2 hemos crea- 
do una figura que simula un 
pequeño muñeco. 

Cuando el gráfico esté 
terminado, podemos intro- 
ducirlo en el ordenador de 
varias formas. La más sen- 
cilla y aconsejable si se está 
empezando, es la utilización 
de la función binaria de 
nuestro ordenador. Para 
ello en un papel apuntare- 
mos los datos de la siguien- 
te forma, empezando por el 
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primer cuadro de arriba a 
la izquierda. Apuntaremos 
un 1 cuando el cuadro en 
cuestión este pintado y con 
un 0 cuando el cuadro esté 
en blanco, siguiendo cua- 
dro a cuadro hasta acabar 
la línea. Cuando hayamos 
completado la línea empe- 
zaremos una nuevo serie de 
números con la siguiente y 
repetiremos la operación 
hasta completar las ocho lí- 
neas. Como se muestra en 
el ejemplo 1, los números 1 
forman el gráfico que he- 
mos creado. 

Una vez realizada esta 
operación y con los datos 
que hemos apuntado, utili- 
zaremos el comando POKE 
para introducir en memoria 
los distintos datos, teniendo 
en cuenta lo siguiente; pa- 
ra averiguar cuál es la di- 
rección donde empieza un 
UDG, lo más sencillo es uti- 



G H I J K 

U X V Z C 

Z "l 



í 5 



g 

w 

I J 
t 4 



Z C 

j K 




lizar PRINT USR "A", obte- 
niendo distintas cantidades 
ya sea nuestro Spectrum de 
un 1 6 ó 48 k. También es im- 
portante que podemos po- 
keor utilizando esta misma 
fórmula, por lo que para in- 
troducir nuestro gráfico, uti- 
lizaremos POKE USR "A", 
y después de la coma con el 
comando BIN colocaremos 
los ocho números que he- 
mos apuntado en la prime- 
ra línea; quedará de la for- 
ma que sigue POKE USR 
"A",BIN 001 1100. Así he- 
mos procedido a introducir 
el primer dato del carácter, 
pero necesitamos introducir 
el resto; por eso tenemos 
que sumar después de las 
comillas de la A y antes de 
la coma, un 1 (POKE USR 
"A"+l, BIN 00111000), y 
en el binario colocar los da- 
tos de la segunda línea y re- 
petir la operación sumando 
luego 2, 3, 4, 5, 6 y 7 y las 
siguientes líneas; como po- 
déis observar en el listado 1 . 

Esta fórmula es sencilla 
pero además de lenta, ocu- 
pa demasiada cantidad de 
memoria, por lo que existen 
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otras fórmulas que realizan 
la misma operación, como 
podréis apreciar en el lista- 
do 2. En él hemos sustituido 
los números en binario por 
sus homólogos en decimal; 
en el listado 3, donde he- 
mos creado un bucle que 
realiza la lectura de los da- 
tos, se introducen en su di- 
rección correspondiente. Es- 
te último listado nos sirve 
además para introducir 
cuantos gráficos deseemos 
de una manera muy sen- 
cilla, basta con sustituir el 
carácter segundo del 
bucle FOR-NEXT, que 
es una a por el carác- 
ter del último gráfico 
que vayamos a reali- 
zar e incluir en DATAS 
los datos correspon- 
dientes al resto de grá- 
ficos. 

Por último para utili- 
zar dicho gráfico rea- 
lizamos las mismas ope- 
raciones que con PRINT 
pero al introducirlo pon- 
dremos el cursor en mo 
do gráfico y pulsaremos la 
letra en la que hemos intro- 
ducido el gráfico, y que en 
el coso que estamos expli- 
cando es la A. 



CUANTOS GRAFICOS 
PODEMOS CREAR 

Es importante saber que 
los UDG, pueden ser posi- 
cionados en cualquier direc- 
ción de la memoria RAM, 
ya que en las variables del 
sistema se encuentran dos 
direcciones que a su vez 
contienen la dirección de 
memoria donde se encuen- 
tran los UDG. Esta variable 
es la denominada lo UDG, 
y su dirección es la 23675 y 
la 23676. 

Cuando la dirección esté 
decidida, por ejemplo la 
60000, calcularemos las 
cantidades que hay que po- 
Icear, para ello utilizaremos 
la siguiente fórmula, PRINT 
INT 60000/256, e introdu- 



ciremos esta cantidad en la 
dirección 23676, luego con 
PRINT 60000-((INT 
60000/256)*256) polca- 
remos el resultado en la di- 
rección 23675 y cualquiera 
de los métodos anterior- 
mente explicados para in- 
troducir el gráfico. 

Para evitar esto limitación 
en su uso, una de las opcio- 
nes por las que podemos 
optar es la de disponer va- 
rios bloques de UDG en la 
memoria, y usuarios según 
la conveniencia. 



MAS DE 21 UDG 

Además de los UDG, po- 
demos definir los 92 carac- 
teres del ordenador, si- 
guiendo las mismas pautas 
que para los gráficos defini- 
dos y posicionorlos en una 
dirección determinada de la 
memoria, y utilizando la va- 
riable del sistema llamada 
CHARS cuya dirección es la 
23606 y la 23607, usare- 
mos la misma fórmula que 
con los UDG pero con estas 
dos direcciones. En el lista- 
do 3 encontraremos un 
ejemplo práctico de cómo 
obtener un set de caracteres 
alternativo; en este progra- 
ma se utiliza una fórmula 
distinta a las anteriormente 
explicadas, que consiste en 
que con ayuda de la función 
RANDOMIZE un número, 
este número se descompone 
automáticamente en el byte 
menos y más significativo, y 
se archiva en la dirección 
23670 y 23671 respectiva- 
mente, por lo que luego só- 
lo nos queda actualizar la 
variable del sistema CHARS, 
con el contenido de estas di- 
recciones. Es importante re- 
cordar a la hora de utilizar 
un nuevo set de caracteres 
que los primeros 256 bytes 
no se pueden emplear por 
lo que debemos restar a la 
dirección donde hayamos 
archivado los gráficos esta 
cantidad. Es también impor- 



tante recordar cuál es el 
contenido de la variable 
CHARS ya que si deseamos 
volver a utilizarlo debere- 
mos teclear los siguientes 
pokes: POKE 23606,0 y 
POKE 23607,60. 

Los gráficos que obtene- 
mos con el listado 3, son los 
que se muestran en la figu- 



COMO UTILIZAR 

LOS UDG 
PARA UN JUEGO 

Como habréis podido 
comprobar, no es nada com- 
plicado realizar un UDG. 
Moverlo por la pantalla en- 
traña algo más de dificul- 
tad. En principio debemos 
tener en cuenta algunas de 
las características del Spec- 
trum. 

La pantalla está compues- 
ta por 32 columnas y 24 li- 
neas, aunque no es fácil 
mover desde el Basic un 
gráfico por las dos líneas in- 
feriores de pantalla. Cual- 
quier desplazamiento por 
pantalla de un gráfico pare- 
cerá que va dando saltos, 
ya que no existe una posi- 
ción intermedia donde im- 
primir el gráfico entre la co- 
lumna 1 y la 2, o la línea 1 
y 2. Con los atributos ocu- 
rre lo mismo, por lo que lo 
normal desde el basic es 
mover los gráficos sin atri- 
butos, dejando el color del 
papel y la tinta como están. 

Con el ejemplo 4, obtene- 
mos el gráfico de un muñe- 
co y con las teclas Q, A, O 
y P desplazaremos el mismo 
por la pantalla. 

Para actualizar el gráfico 
en la posición correspon- 
diente es necesario, prime- 
ro, borrar la posición ante- 
rior, de cuya misión se en- 
carga la línea 80, borrando 
el gráfico antes de actuali- 
zar. Para ello usamos el co- 
mando OVER que imprime 
invirtiendo los pixels de ca- 
da carácter que coinciden 



con otro ya en pantalla; así 
si imprimimos en OVER 1 un 
gráfico igual que esté será 
borrado. 

Evitar que el gráfico par- 
padee se consigue colocan- 
do una línea que detecte si 
se ha pulsado una de las te- 
clas correspondientes al mo- 
vimiento, actuando como si 
de un filtro se tratase. 

Con todas estas técnicas 
con ayuda del comando 
OVER conseguimos que lo 
que anteriormente estaba 
en la pantalla no se bo- 
rre totalmente. Con PLOT, 
DRAW y CIRCLE, dibuja- 
mos algo en pantalla y al 
pasar por encima de las lí- 
neas, el dibujo sólo se borra 
cuando el gráfico está super- 
puesto pero al desplazarlo 
el dibujo se restablece. 



UTILIZACIÓN 
DE CÓDIGOS 
ASC CON PRINT 




El uso de los códigos ASC 
con PRINT nos ayuda a con- 
seguir efectos difíciles como 
los que vamos a explicaros 
a continuación. 

Por ejemplo, utilizando 
CHR $ 8, conseguimos que 
el puntero de pantalla, se 
desplace hacia atrás una 
posición. Para obtener, por 
ejemplo, el gráfico de una 
mina en lugar de diseñarla 
podemos utilizar lo siguien- 

PRINT AT 1O,1O;"0"; 
OVERl,CHR $ 8;"X" 

Existen teóricamente otros 
ASC, que realizan la opera- 
ción de cursor arriba, aba- 
jo y a la derecha, pero por 
errores del sistema no fun- 
cionan correctamente y al 
utilizarlos aparece en pan- 
talla una interrogación al 
igual que ocurre con el de- 
dicado al DELETE y EDIT, 
ASC 12 y 7 respectivamen- 
te. 

Los ASC al utilizarse des- 
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de x e y estén cerrados en- 
tre paréntesis ya que sino 
produciremos un error de 
sintaxis. Para utilizarlo pro- 
bar a imprimir en pantalla 
con papel azul y tinta blan- 
ca un carácter (PRINT PA- 
PER 1;INK 7;AT 10,10; 
"R"), y después usando 
ATTR preguntar qué colores 
están en esas coordenadas 
(PRINT ATTR(10,10)), el va- 
lor devuelto por el ordena- 
dor será el resultado del co- 
lor (15). Este número en bi- 
nario nos dará el dato de 
color del papel y tinta, y el 
estado del brillo y flash. El 
7 bit por la derecha es el 
que indica el estado del 
flash, siendo 0 para desac- 
tivado y 1 para activado. El 



sexto bit nos expresa el es- 
tado del brillo, siguiendo las 
mismas pautas del flash; del 
auinto al tercero son los de- 
dicados ol color del papel, 
y del segundo al cero, el co- 
lor de la tinta. Es aconseja- 
ble utilizar la fórmula si- 
guiente para saber qué nú- 
mero corresponde a un es- 
tado de atributos. 

NÚM. TINTA + NÚM. 
PAPEL'8 + NÚM. BRILLO 
•64 + NUM. FLASH'128 

CHR $n, introduciendo en 
n un número entre 32 y 255, 
obtendremos cualquiera de 
los caracteres ASCII del 
Spectrum y si el número es 
el comprendido entre 6 y el 
23 son destinados ol mane- 
jo de pantalla, siendo inuti- 



lizares los comprendidos 
entre 0 y 5 ó 24 y 31. 

PEEK n, con este coman- 
do podemos averiguar el 
contenido de una celdilla de 
memoria, siendo este núme- 
ro entre 0 y 65535. 

POINT (x,y), si el resulta- 
do de esta operación es 1, 
es que ese pixel está activa- 
do de color de tinta, y si es 
0 no lo está. Este comando 
está limitado a la parte supe- 
rior de la pantalla, siendo 
imposible con su uso com- 
probar el estado de una 
coordenada dentro de la 
zona de pantalla destinada 
a los mensajes. 

SCREEN $ (x,y), del mis- 
mo modo que podemos 
averiguar cuál es el color de 



una coordenada de la pan- 
talla y el carácter que se en- 
cuentra en esta dirección. Al 
realizar esta operación si el 
resultado no es 0 no es que 
no exista en esa posición un 
carácter, sino que no es re- 
conocido como tal por el or- 
denador. 

USR S, muy útil a lo hora 
de averiguar la dirección de 
comienzo de cualquiera de 
los caracteres definidos por 
el usuario. 

BORDER n, sirve para dar 
color al borde siendo éste 
un número comprendido 
entre 0 y 7. 

BRIGHT n, este comando 
sólo puede ser utilizado ac- 
tivado (1) o desactivado 
(0), consiguiendo en una y 




otra forma dar brillo a los 
atributos. 

DATA n,n,n,n, todos los 
datas que aparezcan detrás 
de esta sentencia, serán leí- 
dos como datos, al utilizar 
la función READ. 

FLASH n, su funciona- 
miento es igual que el del 
brillo, pero realizando un 
intercambio de atributos en- 
tre el papel y la tinta, consi- 
guiendo así el efecto de par- 
padeo. 

INK n, el color del atribu- 
to de tinta es controlado por 
este comando permitiendo 
el uso de cualquiera de los 
ocho colores del Spectrum 
además del color 8, paro 
transparente y 9 para con- 
traste. 



INVERSE n, controla la in- 
versión de caracteres que se 
van a imprimir. En caso de 
utilizar con 1 los caracteres 
se imprimen en vídeo inver- 
so, y si es 0 en vídeo nor- 
mal. 

OVER n, realizo un inter- 
cambio al estar activada es- 
ta función, entre los datos 
que estaban en pantalla y 
los que posteriormente sean 
utilizados. 

PAPER n, su funciona- 
miento es completamente 
igual al del comando INK, 
pero controlando el color 
de fondo. 

POKE n, sirve para intro- 
ducir valores comprendidos 
entre 0 y 255 en las direc- 
ciones desde la 16384 y 



65535, con ayuda de POKE 
también podemos realizar 
dibujos en pantalla tanto de 
gráficos como de atributos. 

PRINT, es el comando sin 
lugar a dudas más utilizado 
en Basic; con él podemos 
hacer que aparezca en pan- 
talla cualquier carácter y su 
funcionamiento puede ser 
de distintas maneras. 

AT x,y: si es utilizado con 
AT, posicionamos las coor- 
denadas donde van a ser 
impresos en pantalla uno o 
varios caracteres. 

TAB x: con él sólo pode- 
mos indicar el desplaza- 



miento desde el puntero de 
pantalla tantos números co- 
mo se indiquen en x. 

la coma después de 
PRINT y sin estar entrecomi- 
llada realiza una tabulación 
de 16 caracteres, desde el 
puntero. 

el punto y coma sir- 
ve para indicar al ordena- 
dor que todo lo que está 
unido por ellas se imprime 
seguidamente. 

: la comilla indica al or- 
denador que debe saltar de 
linea para que lo que se ex- 
prese a continuación sea im- 
preso en la línea siguiente. 



CONTROL 



£n primer lugar, 
para los no inicia- 
dos, definiremos 
qué es lo que en- 
tendemos por un 

sprite. 

Llamaremos sprite a un 
gráfico, animado o no, que 
se mueve por la pantalla en 
una dirección determinada. 
Este gráfico deberá pasar 
por delante de lo que haya 
dibujado en pantalla sin bo- 
rrarlo, y si se cruza con otro, 
uno de los dos pasará por 
delante de otro. Por esto ca- 
da sprite tiene asignada una 
prioridad, de tal forma que 
al cruzarse dos sprites, pa- 
sará por delante aquél cu- 
ya prioridad sea mayor. Evi- 
dentemente, no puede ha- 
ber dos sprites con la misma 
prioridad. 

En otros ordenadores, co- 



ISin duda, uno de los 
factores más 
_ decisivos para que un 
i programa tenga éxito 
es su presentación. 
Si la idea es muy 
original, pero los 
gráficos son tamaño 
UDG o parpadean, el 
conjunto desmerece 
bastante. Para 
solucionar el 

I problema 
presentamos una 
rutina que moverá y 
dibujará los gráficos 
mientras nuestro 
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mo el Commodore 64, los 
sprites se generan por hard- 
ware, con lo cual no se con- 
sume tiempo de programa. 
Pero lamentablemente, en el 
Spectrum no existe hardwa- 
re para lo creación de spri- 
tes, así que no tendremos 
más remedio que crearlos 
por software. Para ello, uti- 
lizaremos un programa en 
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Código Máquina que se eje- 
cutará automáticamente 
gracias a las interrupciones. 
Sobre interrupciones ya se 
ha hablado bastante en nú- 
meros anteriores de esta re- 
vista, así que bastará con 
que digamos que sirven pa- 
ra que una subrutina escri- 
ta en Código Máquina se 
ejecute automáticamente 50 
veces por segundo. Cuando 
termina, se devuelve el con- 
trol al programa que estaba 
ejecutándose antes de pro- 
ducirse el salto a la subruti- 
na. De esta forma, pode- 
mos lograr el efecto de que 
se están efectuando dos ta- 
reas a la vez. En nuestro ca- 
so, una de las tareas será el 
dibujo de los sprites, y la 
otra cualquier programa es- 
crito por nosotros, ya sea en 
Basic o Código Máquina. 

Normalmente, las subru- 
tinas que se ejecutan por in- 
terrupciones suelen ser muy 
cortas, de tal forma que 
aparentemente la velocidad 
del programa principal es la 
misma que tendría si no hu- 
biera interrupciones. Sin 
embargo, el dibujo de grá- 
ficos y el manejo de la pan- 
talla en general, es siempre 
bastante lento, v cuando 
pongamos en marcha los 
sprites, notaremos un des- 
censo enorme en la veloci- 
dad de ejecución de nues- 
tros programas. Es el precio 
que hay que pagar por no 
tener el hardware adecua- 
do. A pesar de todo, si pro- 
gramamos en Código Má- 
quina, tendremos suficiente 
velocidad para bastantes 
cosas, pues no hay que ol- 
vidar que nuestro programa 
ya no se tendrá que preocu- 
par de dibujar los gráficos, 
que suele ser el proceso que 
más tiempo consume en la 
ejecución de un programa, 
sobre todo en los juegos ar- 
cade. 

El método que vamos a 
utilizar para dibujar los grá- 
ficos es el de la máscara. En 
este método, cada gráfico 



se compone en realidad de 
dos gráficos: el gráfico pro- 
piamente dicho y su másca- 
ra. La máscara es un gráfi- 
co adicional, de las mismas 
dimensiones que el primero, 
y que nos facilita informa- 
ción acerca de la forma de 
éste. Esto sirve para que 
cuando el sprite pase por 
delante de algo, no se mez- 
cle su imagen con la del fon- 
do ni se borre un rectángu- 
lo del fondo alrededor del 
sprite, como suele ocurrir en 
los métodos tradicionales de 
dibujo de sprites. Es el mé- 
todo que se suele usar en los 
juegos tridimensionales, co- 
mo «Knight Lore», y en algu- 
nos otros, como «Everyone's 
Wolly». Tiene el inconve- 
niente de ocupar más me- 
moria (cada gráfico ocupa 
el doble, pues necesita de su 
máscara) y de ser más len- 
to el proceso de dibujo, pe- 
ro los resultados obtenidos 
son mucho más espectacu- 
lares. Para los que leyeron 
los artículos sobre el sistema 
Filmation, publicados en los 
números 96,97,99 y 100 de 
MICROHOBBY, en los que 
se utilizaban también más- 
caras, advertimos que en es- 
ta rutina vamos a utilizar un 
método ligeramente distin- 
to. Para evitar el paso de in- 
versión de la máscara des- 
crito en dichos artículos, no- 
sotros almacenaremos la 
máscara ya invertida, con lo 
que ahorramos tiempo a la 
hora de dibujar el gráfico. 
Por tanto, si tenéis hechos de 
antemano gráficos pensa- 
dos para la rutina presenta- 
da en dichos artículos y los 
queréis usar con ésta, debe- 
réis invertir todos los bytes 
de la máscara. Lo forma de 
hacerlo es bien sencilla. Si 
por ejemplo, tenéis una 
máscara en la dirección 
40000 que ocupa 32 bytes, 
bastará con que hagáis: 

FOR X 40000 TO 40031 

:POKE X,255-PEEK X: 
NEXT X 



Si vais a crear gráficos 
nuevos, específicamente pa- 
ra esta rutina, la forma de 
crear la máscara, una vez 
realizado el gráfico, podría 
ser así: 

Observamos la figura 1. 
En primer lugar, alrededor 
del gráfico terminado (par- 
te A), dibujamos una línea 
que marque su contornos, 
obteniendo la parte B. A 
continuación, rellenamos 
desde aquí hacia afuera to- 
do el rectángulo que contie- 
ne el gráfico, obteniendo la 
parte C. Por último, borra- 
mos el gráfico original (na- 
turalmente, antes lo habre- 
mos grabado), y nos queda 
la parte D, que es ya la más- 
cara. Si el gráfico tuviera 
agujeros internos (por ejem- 
plo, si dibujamos una rosqui- 
lla), deberemos hacer el 
mismo proceso con los agu- 
jeros. Lo que representa la 
máscara son las zonas del 
gráfico a través de las que 
se puede ver el fondo. 
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Para conseguir que nues- 
tro sprite se mueva como 
nosotros queremos, habre- 
mos de comunicarle de al- 
gún modo a la rutina de 
control todos los datos nece- 
sarios acerca de él. Con es- 
te fin, vamos a crear una ta- 
bla de sprites, en la que ire- 
mos poniendo la posición, 
dimensión, y demás datos 
de cada uno de ellos. La ru- 



tina está pensada para ma- 
nejar un máximo de 17 spri- 
tes, que numeraremos del 0 
al 16 (este número servirá 
asimismo para indicar la 
prioridad del sprite). Como 
veremos enseguida, para 
especificar toaos los datos 
de un sprite necesitaremos 
17 bytes, o lo que es lo mis- 
mo, un total de 1 7 x 1 7 = 289 
bytes, que los colocaremos 
en la dirección 53000. De 
esta forma, los datos del pri- 
mer sprite estarán a partir 
de la dirección 53000, los 
del segundo en la 53017, 
etc. 

Vamos a ver ahora qué es 
lo que deberemos meter en 
cada uno de esos grupos de 
17 bytes. Tenemos un resu- 
men en la figura 2. Los dos 
primeros servirán para indi- 
car la dirección de memoria 
en la que se encuentra el 
gráfico. Siempre, a conti- 
nuación del gráfico propia- 
mente dicho, se debe en- 
contrar su máscara. Si el 
sprite representa un objeto 
o un ser animado, deberá 
constar de varios gráficos 
parecidos, pero distintos pa- 
ra lograr el efecto de ani- 
mación. En este caso, todos 
estos gráficos deben estar 
uno a continuación del otro, 
y cada uno con su máscara 
detrás. 

El tercer y cuarto byte in- 
dican las dimensiones del 
sprite. El tercero indicará el 
ancho, dado en caracteres, 
y el cuarto el alto, dado en 
píxels. Todos los gráficos de 
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F¡g. 2 

TABLA DE DATOS 
DE LOS SPRITES 

Dirección Contenido 
relativa 

DIR + 0 Dirección del 

primer gráfico. 
DIR + 2 Anchoen 

caracteres. 
DIR -» 3 Alto en scans 

(pixels). 
DIR + 4 Coordenada X. 
DIR + 6 Coordenada Y. 
DIR + 8 Número de fa 

ses de 

animación. 
DIR + 9 Color. Bit 

3:Animación. 

Bit 

4:Movimiento. 

DIR 4 10 Incremento X. 

DIR. Tabla de 
trayectoria. 

DIR + 1 1 Incremento Y. 

DIR + 12 Contador de 
animación. 

DIR + 13 Contador de 
trayectoria. 

DIR +15 Memoria ocupa- 
da por cada 
gráfico. 



las distintas fases de un úni- 
co sprite y sus respectivas 
máscaras deberán tener las 
mismas dimensiones. 

Los bytes quinto y sexto 
especifican la coordenada X 
del sprite, mientras que los 
séptimo y octavo especifican 
la Y. Ambas serán números 
entre -32768 y +32767. 
Esto nos permite crear un 
sprite inicialmente en unas 
coordenadas que no existan 
en la pantalla real del orde- 
nador, y hacer que aparez- 
ca posteriormente. Si la 
coordenada X está entre 
32512 y 32767 (o lo que es 
lo mismo, si el byte sexto es 
127), se considerará al spri- 
te como desactivado y ni se 
le moverá ni se le dibujará. 
A diferencia del Basic, la 
coordeanda Y comienza 



por 0 en la parte superior y 
va aumentando hacia aba- 
jo. 

El noveno byte nos dice 
cuántas fases de animación 
tiene el sprite. Si se trata de 
un sprite inanimado, pon- 
dremos una fase. 

El décimo indica varias 
cosas. En primer lugar, indi- 
ca el color del sprite. Los tres 
primeros bits indican el co- 
lor de la tinta, y el séptimo 
bit (el bit 6) indica el nivel de 
brillo. Los sprites no tienen 
color de papel propio; 
adoptan el del fondo por el 
que pasan. Por otra parte, 
el cuarto bit (el bit 3) indica, 
en el caso de sprites anima- 
dos, de qué tipo de anima- 
ción se trata. Para sprites 
inanimados, su valor es in- 
diferente. Si vale 0 la anima- 



1234512345123 
4 5... 

Si, por el contrario, espe- 
cificamos animación de 
adelante-atrás, obtendre- 
mos la secuencia: 

1234543212345 
4 3 21 2... 

Por último, en este décimo 
byte, está también, en el bit 
4 el indicador de linea rec- 
ta (con un 0) y trayectoria 
compleja (con un 1). La op- 
ción de línea recta se usará, 
como su propio nombre in- 
dica, para sprites que se 
muevan en línea recta, sea 
horizontal, vertical o diago- 
nal. Sin embargo, habrá ca 
sos en que preferiremos que 
nuestro sprite siga-una tra- 
yectoria preestablecida dis- 
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Gráficos usados en la demostración 



Dirección 


Gráfico 


Dimensiones 

(•" 
caracteres) 


Número 
de fases 


47300 


COHETE 


2x2 


1 


47364 


RELOJ 


3x3 


8 


48516 


FLECHA -> 


2x2 


1 


48580 


FLECHA £ 


2x2 




48644 


FLECHAÍ 


2x2 




48708 


FLECHAN 


2x2 


1 


48772 


FLECHAD- 


2x2 


1 


48836 


FLECHA s 


2x2 


1 


48900 


FLECHA [ 


2x2 




48964 


FLECHA N 


2x2 





ción será cíclica, mientras 
que si vale 1, será una ani- 
mación de adelante-atrás. 
La primera es la que usaría- 
mos, por ejemplo, para un 
helicóptero cuyas hélices gi- 
ran. La segunda la usaríamos, 
por ejemplo, para un pez 
que mueve la cola. Si tenemos 
cinco fases de animación, 
que podemos numerar del 1 
al 5, y especificamos anima- 
ción cíclica, las fases se irán 
repitiendo de esta forma: 



tinta de la linea recta, por 
ejemplo, un satélite que gi- 
ra en círculo alrededor de 
un planeta. Para esto sirve 
la opción de trayectoria. La 
forma de establecer la tra- 
yectoria la vamos a ver a 
continuación. 

El significado de los bytes 
undécimo y decimosegundo 
no es el mismo si el sprite se 
mueve en línea recta o si- 
guiendo una trayectoria es- 
pecial. 



En el caso de un movi- 
miento en linea recta, estos 
bytes indican los incremen- 
tos de X e Y respectivamen- 
te. Dichos incrementos son 
números entre —128 y +127, 
que se suman cada vez a las 
coordenadas del sprite pa- 
ra producir el movimiento. 
Cuanto mayor sea su valor 
absoluto, mayor será la ve- 
locidad con que se mueva el 
sprite, pero menor su suavi- 
dad. Los incrementos más 
normales están entre —4 y 
+ 4. En la coordenada X, un 
incremento positivo produci- 
rá un movimiento hacia la 
derecha, y negativo, hacia 
la izquierda. En la Y, un in- 
cremento positivo producirá 
un movimiento hacia abajo, 
y negativo hacia arriba. 

En el caso de un movi- 
miento de trayectoria prefi- 
jada, estos dos bytes indican 
la dirección donde se en- 
cuentran los datos acerca 
de la misma. En esta direc- 
ción pondremos dichos da- 
tos de la siguiente forma: 
para delimitar la trayecto- 
ria, se colocan grupos de 
dos bytes que indican los in- 
crementos X e Y a efectuar 
en cada momento. Pero 
además, puede que quera- 
mos que el sprite cambie su 
forma durante el movimien- 
to. Por ejemplo, si queremos 
dibujar una nave girando, 
no bastará con dar los incre- 
mentos que delimiten la tra- 
yectoria de giro, sino que, 
además, deberemos ir dibu- 
jando un gráfico un poco gi- 
rado respecto del anterior 
para que parezca que la na- 
ve está realmente girando. 
Para ello, entre los grupos 
de dos bytes que delimitan 
el movimiento, colocaremos 
un 126, y a continuación, la 
dirección de memoria don- 
de se encuentra el nuevo 
gráfico. Para terminar la tra- 
yectoria, colocaremos un 
127 y ésta se repetirá desde 
el principio. 

El byte decimotercero es 
utilizado como contador pa- 
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ra la animación, y debere- 
mos inicializarlo a 0. 

Los bytes decimocuarto y 
decimoquinto se usan como 
contador para la trayecto- 
ria. Si estamos utilizando un 
movimiento en trayectoria 
preestablecida, deberemos 
inicializarlos con los mismos 
valores que los bytes undé- 
cimo y decimosegundo, es 
decir, con la dirección de los 
datos de la trayectoria. Si el 
movimiento es rectilíneo, es- 
tos bytes no se usan. 

Por último, los bytes deci- 
mosexto y decimoséptimo 
indican la cantidad de me- 
moria que ocupa cada grá- 
fico del sprite, ya sea gráfi- 
co propiamente dicho o 
máscara, y se calcula multi- 
plicando el ancho en carac- 
teres por el alto de pixels. 
Este valor es para el uso in- 
terno de la rutina, y no ha- 
bría sido necesario incluirlo 
en la tabla de sprites, pues 
se puede calcular a partir 
de los contenidos de los 
bytes tercero y cuarto, pero 
se ha incluido por razones 
de velocidad. 



EL PROGRAMA 



Antes de profundizar más 
en el funcionamiento de la 
rutina, sería pre'eiible te- 
clear ahora el programa 
para ver los resultados y 
comprender asi me|or cómo 
funciona. En primer lugar, 
habremos de teclear el lista- 
do 1 y grabarlo en cinta con 
autoejecución en la linea 
9999. A continuación, y con 
ayuda del Cargador Uni- 
versal de Código Máquina, 
publicado innumerables ve- 
ces en Microhobby y Micro- 
manía, teclearemos el lista- 
do 2 y lo grabaremos en cin- 
ta, a continuación, del Ba- 
sic con el nombre «Spri- 
te.Code Data», indicando 
como dirección de comien- 
zo 47140, y como longitud 
1888. Ahora podemos te- 
clear el listado 3 en el Car- 
gador Universal de Código 



Máquina, o el listado 4 con 
un ensamblador, preferible- 
mente el Gens, y ensamblar. 
En ambos casos, grabare- 
mos el resultado a continua- 
ción de lo anterior como 
«Sprite.Code USR», indican- 
do como dirección la 61953, 
y como longitud 1495. Aho- 
ra, ya lo tenemos todo listo. 
Rebobinemos y carguémos- 
lo todo. El verdadero pro- 
grama controlador de spri- 
tes es el del listado 3 ó el 4. 
El Basic y el listado 2 sirven 
para efectuar una demos- 
tración de sus posibilidades, 
que son las que veremos al 



crear en la tabla anterior- 
mente explicada. Es necesa- 
rio advertir que si quere- 
mos, por ejemplo, crear tres 
sprites, estos deberán ser los 
números 0, 1 y 2, es decir, 
los tres primeros. El progra- 
ma Basic utiliza una subru- 
tina que lee los datos de li- 
neas DATA y hace los POKEs 
pertinentes, pero cada uno 
puede hacerse su propia 
subrutina como quiera, te- 
niendo en cuenta cuáles son 
los datos que hay que indi- 
car, y que ya han sido expli- 
cados. Una vez creados los 
datos de los sprites, activa- 



inicializada al activarse las 
interrupciones, así que si 
queremos que nuestros spri- 
tes se muevan sobre algún 
fondo o dibujo, tendremos 
que dibujarlo en la pantalla, 
justo antes de hacer el RAN- 
DOMIZE USR 61953. Una 
consecuencia del uso de 
una pantalla en memoria, 
es que no podremos dibujar 
ni escribir nada en la pan- 
talla del ordenador, porque 
las interrupciones se encar- 
gan de copiar constante- 
mente la pantalla de memo- 
ria en la pantalla del orde- 
nador, asi que nada más es- 




finalizar la carga. Dicha de- 
mostración se compone de 
siete ejemplos, desde el más 
simple hasta el más comple- 
jo. Estos ejemplos no están 
pensados solamente para 
que veamos cómo se mue- 
ven los sprites, sino para 
que, estudiando el progra- 
ma Basic, podamos com- 
prender mejor cómo mane- 
jarlos desde nuestros pro- 
pios programas. En él pode- 
mos ver cuál es la secuencia 
a realizar para que los spri- 
tes comiencen a moverse: 
en primer lugar, se introdu- 
cen los datos de cada uno 
de los sprites que queramos 



remos las interrupciones con 
RANDOMIZE USR 61953 e 
indicaremos el programa 
controlador de sprites, 
cuántos sprites estamos uti- 
lizando, haciendo POKE 
23681, N, donde N es el nú 
mero de sprites. A partir de 
ese momento, los sprites co- 
menzarán a moverse. 

Para evitar parpadeos y 
otras fealdades varias, to- 
dos los dibujos se hacen en 
una copia de la pantalla 
que se encuentra en otra di- 
rección de memoria, y lue- 
go el resultado se vuelca a 
la pantalla del ordenador. 
Esta copia de la pantalla es 



cribir algo, se borrará auto- 
máticamente. Para poder 
escribir algo, deberemos 
hacerlo antes de activar las 
interrupciones, o escribien- 
do directamente en la pan- 
talla de memoria, para lo 
cual veremos más adelante 
dónde y cómo está coloca- 
da. 

Independientemente de la 
rutina de sprites, hay una 
subrutina que puede resul- 
tar muy útil en algunos ca- 
sos. Se trata de la que com- 
prueba el choque entre dos 
sprites. La forma de utilizar- 
la es la siguiente: POKE 
23729,A:POKE 23728,B: 
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LETC=USR 62082, donde 
A y B son los códigos de dos 
sprites, y C terminará valien- 
do 1 si los dos sprites están 
chocando o 0 si no lo están. 
Si lo que queremos es ave- 
riguar si un sprite está cho- 
cando con cualquier otro, 
sin importarnos cuál, susti- 
tuiremos B por un 255. 

Comentemos un poco los 
ejemplos de la demostra- 
ción, porque ilustran bas- 
tante bien las características 
de los sprites. 

El primer ejemplo es el 
más sencillo. Un único spri- 
te de color rojo y sin anima- 



oportunos, en este caso, las 
direcciones 53004 Y53006. 

En el tercer ejemplo, ve 
mos como actúa la másca- 
ra para producir un efecto 
muy convincente de que el 
sprite está por delante del 
fondo. Desgraciadamente, 
podemos comprobar tam- 
bién cómo en el Spectrum es 
imposible evitar la famosa 
mezcla de colores, pero és- 
ta es reducido al mínimo po- 
sible. 

El cuarto ejemplo consta 
ya de dos sprites para ver 
cómo al cruzarse uno pasa 
por delante del otro. Pode- 



El sexto ejemplo muestra 
lo llena que puede parecer 
la pantalla cuando se colo- 
can los 17 sprites circulando 
en todas direcciones. 

Por último, el séptimo no 
se limita a crear los sprites 
y dejar que se muevan, sino 
que, con la ayuda de la su- 
brutina y de comprobación 
de choque, produce unos 
sonidos cada vez que el co- 
hete es interceptado por 
una flecha. Es un ejemplo 
muy simplificado de lo fácil 
que es hacer un juego utili- 
zando esta rutina para con- 
trolar los sprites. 



tos de un ejemplo y los de 
otro, y no los lea todos de 
una vez. 

La rutina de interrupcio- 
nes, la pantalla de memo- 
ria, y algunas zonas de da- 
tos más, ocupan por com- 
pleto de la dirección 53000 
en adelante, asi que nues- 
tros programas y gráficos 
deben situarse por debajo 
de aquí. Puede parecer que 
ocupa demasiado, pero, de 
hecho, es más o menos lo 
que suelen ocupar las ruti- 
nas y áreas de datos desti- 
nados al mismo fin en pro- 
gramas comerciales. Hay 





ción aparece a la izquierda 
de la pantalla y se mueve 
hacia la derecha. 

El segundo ejemplo nos 
muestra una especie de re- 
loj con una aguja siempre 
quieta y la otra girando en 
sentido horario. Como de- 
beriáis haber supuesto, se 
trota de animación cíclica. 
Además, podéis comprobar 
cómo un sprite no necesita 
estar siempre moviéndose, 

?>uede estar en una posición 
¡ja, poniendo los incremen- 
tos X e Y a 0 . En este modo, 
podemos controlar directa- 
mente la posición del sprite, 
pokeando en los lugares 



mos comprobar también có- 
mo el sprite toma el color de 
papel que haya en la pan- 
talla, lo que contribuye a 
evitar un poco lo mezcla de 
colores que acabamos de 
mencionar. 

El quinto ejemplo mues- 
tra, por una parte, un ejem- 
plo práctico del uso de tra- 
yectorias preestablecidas 
con una flecha que gira, y 
por otra parte un grupo de 
cuatro flechas paradas de 
las que dos tienen anima- 
ción cíclica y dos de 
adelante-atrás, para que se 
puedan apreciar bien las di- 
ferencias entre uno y otra. 



Para hacer vuestras pri- 
meras pruebas, podéis utili- 
zar también el programa 
Basic de demostración, con 
sólo cambiar los DATAs de 
algún ejemplo. Para ayuda- 
ros, tenéis en la figura 3 una 
tabla con las direcciones y 
demás datos de los gráficos 
usados para la demostra- 
ción, y en la figura 4 un re- 
sumen de qué valores y en 
qué orden debéis poner en 
los DATAs. Advertencia im- 
portante: al final de los da- 
tos de todos los ejemplos, es 
necesario añadir un cero a 
los DATAs para que el pro- 
grama distinga entre los da- 



que pensar que solamen- 
te la pantalla de memoria 
ocupa ya unos 7 K. Pero 
si todavía os parece mu- 
cho, vamos a ver con de- 
tenimiento qué es lo que 
hay a partir de esa direc- 
ción. 



MAPA DE MEMORIA_ 

Si sólo pensáis usar la ru- 
tina desde Basic y no tenéis 
ningún interés en el Código 
Máquina, no es necesario 
que leáis este apartado ni el 
siguiente, pues en innecesa- 
rio lo que se dice en ellos 



para poder utilizar los spri- 
tes. Pero si sabéis Código 
Máquina, continuad leyen- 
do y podréis sacar mucho 
más provecho a la rutina. 

En la figura 5 tenéis un es- 
quema del mapa de memo- 
ria. Lo primero que tene- 
mos, entre las direcciones 
53000 y 53288, es la tabla 
de sprites, ya explicada an- 
teriormente, y cuyo inicio 
será denominado TASPRI a 
partir de ahora. 

Lo siguiente, entre 53288 
y 53543, es otra tabla, 
TABLDI, que no hemos ex- 
plicado antes porque es de 
uso interno de la rutina. En 
esta se almacenan una serie 
de datos de los sprites, pe- 
ro solamente de los que se 
van a dibujar en pantalla 
(como hemos visto, puede 
haber sprites fuera de ésta). 
En la figura 6 hay un resu- 
men de los 15 bytes de que 
consta cada elemento. Los 
dos primeros bytes indican 
la dirección en la pantalla 
de memoria a la que va a ir 
el gráfico. Los dos siguien- 
tes indican la dirección del 
gráfico, y los otros dos, la 
de la máscara. El séptimo 
byte indica el numero de 
scans, o lo que es lo mismo, 
la altura en pixels. El octa- 
vo byte indica el ancho en 
caracteres. Tanto éste como 
el anterior no tienen por 
qué corresponder con los 
dados en la tabla de sprites, 
ya que éstos se refieren a las 
dimensiones del gráfico que 
se va a dibujar en pantalla, 
y si éste se encuentra en un 
lado o una esquina, la por- 
ción de gráfico que se ve es 
menor que el gráfico ente- 
ro. El noveno byte nos dice 
cuántos caracteres de an- 
cho quedan fuera de la 
pantalla. Comprobaremos 
su utilidad al estudiar el pro- 
grama. El décimo byte es el 
fíamado byte de rotación. 
Puede valer 248, 250, 252 
ó 254, y es el byte alto de 
la dirección de comienzo de 
una tabla. Son, por tanto, 



Fig. 4 

Valores a colocar en los 
DATAS 
en el programa Basic 

— Dirección del primer 
gráfico. 

— Ancho en caracteres. 

— Alto en pixels. 

— Coordenada X. 

— Coordenada Y. 

— Número de fases de 
animación. 

— lndicador:0= anima- 
ción cíclica, 1= adelan- 
te/atrás. 

— lndicador:0= linea rec- 
ta, 1= trayectoria com- 
pleja. 

— Color 

(tinta + 64 x brillo). 

— Si línea recta: 

— Incremento X. 

— Incremento Y. 

— Si trayectoria comple- 
ja: 

— Dirección de los 
datos de la trayec- 
toria. 



cuatro tablas. La primera va 
de 63488 a 63999, la se- 
gunda de 64000 a 64511, 
la tercera de 64512 a 
65023, y la cuarta de 
65024 a 65535. Las cuatro 
se crean en el momento de 
activar las interrupciones. 
Lo que hay en ellas es el re- 
sultado de girar cada uno 
de los 256 posibles números 
que puede contener un 
byte, 6 bits hacia la dere- 
cha, en la tabla cuarta, 4 en 
la tercera, 2 en la segunda 
y 0 en la primera. La utili- 
dad es que a la hora de di- 
bujar un gráfico, no tendre- 
mos que utilizar instruccio- 
nes de rotación que hacen 
más lento el proceso, pues- 
to que ya tenemos el traba- 
jo hecho. Por ejemplo, si 
queremos girar el número 
47, 4 bits a la derecha (el 
número 47 puede formar 
parte de un gráfico, ya que 
sabemos que todos los grá- 
ficos, en el ordenador se re- 
ducen a números binarios, 
con un equivalente deci- 
mal), el proceso a efectuar 
sería cargar el registro H 
con 252, que es el número 
que corresponde a la tabla 
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ORIGSC 
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63488 
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tercera, después cargar 1 
con 47, que es el número 
que queremos girar, y la di- 
rección formada contendrá 
el resultado deseado. Como 
al girar un byte, hay una 
parte que se sale, ésta se al- 
macena en otra dirección, 
justo 256 bytes más arriba, 
así que basta con incremen- 
tar H para obtenerla. Si no 
os ha quedado demasiado 
claro, posiblemente lo en- 
tendáis mejor cuando veáis 
la subrutina que crea la ta- 
bla. Como muchos de voso- 
tros ya habréis adivinado, el 
que sólo haya cuatro tablas 
quiere decir que el progra- 
ma no trabaja realmente en 
alto resolución en este sen- 
tido horizontal, sino que el 
mínimo desplazamiento es 
de dos pixels. Esto no supo- 
ne un gran problema, pues 
la suavidad obtenida es más 
que suficiente. Sin embargo, 
para mayor comodidaa se 
permite que se den las coor- 
denadas como si el mínimo 
desplazamiento fuera de 
dos pixels. La verdad es que 
este sistema del uso de ta- 
blas con los bytes desplaza- 
dos no es de nueva crea- 
ción, ha sido utilizado en 
varios programas comercia- 
les, entre los que cabe des- 
tacar «Cyberun», cuyo rápi- 
do scroll habría sido impo- 
sible con métodos conven- 
cionales. Pero continúemos 
con el contenido de la tabla 
TADIBL. El undécimo byte 
indica los atributos del spri- 
te. El decimosegundo y el 
decimotercero indican la di- 
rección en la pantalla de 
memoria, donde van a ir los 
atributos del sprite. Por últi- 
mo, los bytes decimocuarto 
y decimoquinto indican el 
número de filas y el de co- 
lumnas, respectivamente, 
que ocupa el grá- 
fico en la zona de atribu- 
tos. 

Continuando con el mapa 
de memoria, entre las direc- 
ciones 53544 y 54566, está 
el espacio denominado 
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SPARES. Es uno zona de tra- 
bajo donde se almacenarán 
los trozos de pantalla que 
van a ser borrados al dibu- 
jar los sprites, para poder 
restablecerlos después. La 
cantidad de memoria nece- 
saria depende de los sprites 
que se vayan o utilizar y sus 
dimensiones. El valor que se 
le ha dado es un valor pro- 
medio que será suficiente 
pora casi todos los casos. Si 
para vosotros resulta insufi- 
ciente, podéis colocar esta 
zona en otra parte de la 



memoria, cambiando el 
EQUde la etiqueta SPARES 
en el listado ensamblador. 

En la dirección 54568 se 
encuentra la pantalla de 
memoria. Como sabéis, la 
antaila del Spectrum tiene 
56 pixels de ancho (32 ca 
racteres) por 192 de alto, 
asi que ocupa 32x192 = 
= 6144 bytes (sin contar con 
los atributos), asi que, en 
rincipio esto es lo que de- 
ería ocupar la pantalla de 
memoria. Sin embargo, es- 
to no es así. Lo que pasa es 



que para poder generalizar 
al máximo la subrutina que 
se encarga de dibujar los 
gráficos en esta pantalla, 
necesitamos un carácter 
más de ancho, en el que se 
dibujarán restos de los spri- 
tes que, por estar a medias 
en la pantalla, no deben ser 
dibujados enteros. De esta 
manera, lo pantalla de me- 
moria ocupará 33x192 = 
= 6336 bytes. En realidad, 
ocupa un byte más, porque 
también para generaliza- 
ción de la subrutina del di- 



bujo, se necesita que esta 
columna adicional seo un 
pixel más alta que el resto 
de la pantalla. Así que en 
realidad, la zona ocupada 
por la pantalla comienza en 
54567, pero la dirección 
que se corresponde con el 
inicio de la pantalla real del 
ordenador, es la 54568, 
que es la que tiene el nom- 
bre de ORIGSC. 

A continuación de la pan- 
talla, se encuentran sus atri- 
butos, en la dirección 60904, 
con la etiqueta ORIGAT. Al 
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igual que antes, necesitamos 
una columna más, con lo 
que ocuparán 33 x 24 = 792 
bytes. En este caso, no ne- 
cesitamos reservar especial- 
mente otro byte antes de la 
dirección 60904, pues nos 
sirve el último de la zona de 
la pantalla, que será a la 
vez el último byte de la pan- 
talla y el primero de los atri- 
butos. 

En la dirección 61696 se 
encuentra la tabla de inte- 
rrupciones. Se ha dicho mu- 
chas veces en esta y en otras 
revistas que en el modo 2 de 
interrupciones el micropro- 
cesador toma el contenido 
del registro I y el del bus de 
datos, que siempre es 255, 
y forma una dirección, de la 
que se extrae la dirección 
definitiva de la subrutina de 
interrupciones. Sin embar- 
go, hay algunos periféricos 

3ue, por no estar demasia- 
o bien hechos, hacen que 
el contenido del bus de da- 
tos en el momento de las in- 
terrupciones no sea 255. Es- 
to quiere decir que la direc- 
ción donde el microprocesa- 
dor buscará la dirección de 
las interrupciones, puede 
ser cualquiera cuyo byte al- 
to sea el contenido del regis- 
tro I. Para conseguir que 
sea cual sea el valor del bus 
datos, se lea la misma direc- 
ción para la subrutina de in- 
terrupciones, no hay más 
remedio que elegir para la 
subrutina una dirección cu- 
yos byte alto y bajo sean 
iguales, y llenar con el va- 
lor de estos, 257 bytes a 
partir de la dirección XX00, 
siendo XX el contenido del 
registro I. En nuestro caso, 
para que la tabla de inte- 
rrupciones esté en 61696, I 
valdrá 6 1696/ 256 -241, y 
la subrutina de interrupcio- 
nes comenzará en 
62194 = F2F2h, así que la 
tabla estará llena de 
242 - F2h. Es fácil ver que 
entonces, sea cual sea el 
contenido del bus de datos, 
la dirección formada con el 



registro I estará entre 61696 
y 61951 , y que el contenido 
de cualquiera de estas di- 
recciones y de las siguientes 
será 242, con lo que siem- 
pre se saltará a la dirección 
242 * 256 + 242 = 62194. 

Tras la tabla de interrup- 
ciones tenemos, en 61953, 
INICIO, la subrutina que 
inicializa las interrupciones y 
crea la pantalla de memo- 
ria y las tablas de rotacio- 
nes. 

En 620 75 está DESACT la 
subrutina que desactiva las 
interrupciones y vuelve al 
modo normal. 

En 62082 está la subruti- 
na COMCHO, de compro- 
bación de choque de spri- 
tes. En realidad no cabe en- 
tera aquí, pues se montaría 
sobre la dirección donde 
deben comenzar las inte- 
rrupciones, por lo que par- 
te de ella se encuentra al fi- 
nal de todo el bloque de la 
rutina de interrupciones y 
sus subrutinas. 

En 62194 se encuentra la 
subrutina principal de inte- 
rrupciones, junto con todas 
sus subrutinas y variables 
(excepto NUMSPR y SPRICH, 
que se encuentran en varia- 
bles del sistema no usadas). 
Detrás, como ya hemos di- 
cho, continúa la subrutina 
de comprobación de cho- 
que, que aunque no es muy 
larga, ha sido cortada en 
dos para aprovechar mejor 
la memoria, rellenando ios 
huecos. 

Y lo último que hay en la 
memoria son las ya mencio- 
nadas tablas de rotaciones, 
que comienzan en 63488. A 
propósito de estas tablas, 
seguramente os habréis 
preguntado qué sentido tie- 
ne almacenar un byte gira- 
do 0 veces (que es lo que 
hay en la primera tabla), 
puesto que el resultado se- 
rá el mismo. La respuesta es 
bien sencilla. Si no incluyé- 
ramos esa tabla, sería nece- 
sario hacer dos subrutinas ' 
de dibujo, una para cuando 



el gráfico está en el primer 
píxel de un carácter y otra 
para el resto de los casos. El 
resultado quedaría menos 
elegante, sería más difícil de 
comprender y ocuparía 
prácticamente la misma me- 
moria. 



FUNCIONAMIENTO 

El proceso que hay que 
realizar para mover los spri- 
tes por lo pantalla es bas- 
tante complejo y lleva bas- 
tante tiempo. Por ello, lo va- 
mos a dividir en dos partes, 
de tal modo que una vez 
haremos una parte, y la si- 
guiente vez haremos la otra 
parte, y a la siguiente volve- 
remos a hacer la primera, y 
así. Hacemos el volcado en 
pantalla de la pantalla de 
memoria, que es el proceso 
más lento, y la segunda, ha- 
remos el resto, que se pue- 
de dividir en las siguientes 
subetapas: 

— Borrar los sprites de 
sus posiciones antiguas. 

— Calcular nueva posi- 
ción de los sprites y el gráfi- 
co que toque de los que 
compongan la animación 
de cada uno. 

— Hacer todos los cálcu- 
los necesarios para el dibu- 
jo de los gráficos y su pos- 
terior borrado, almacenan- 
do los resultados en la tabla 
TABLDI, a la vez que se al- 
macenan los trozos de pan- 
talla que van a ser ocupa- 
dos por los sprites. 

— Dibujar los spri- 
tes que se en- 
cuentren en 
la pantalla. 

Ahora que 
sabemos to- '.(' 
das las tareas V* 
a realizar, po- <* 
demos comen- 
zar a comentar 
el listado de la 
rutina. 

El punto de en- 
trada de ENTIT. 
Aquí, lo primero que 



hacemos es guardar todos 
los registros que vamos a 
utilizar. A continuación, es- 
tudiamos el contenido de la 
variable ESTADO. Si es 0, 
deberemos volcar la panta- 
lla, y si es 1, hacer todo lo 
demás. En este segundo ca- 
so saltamos a NOVOLC. En 
el primero, llamamos a la 
subrutina que vuelca la pan- 
talla y hacemos que ESTA- 
DO valga 1 para la próxi- 
ma vez que se produzca 
una interrupción, para salir 
después por SALINT. 

En el caso de encontrar- 
nos en la segunda porte, 
ponemos ESTADO a 0 pa- 
ra la próxima vez. Después 
nos disponemos a borrar to- 
dos los sprites dibujados la 
última vez. Para ello, toma- 
mos el contenido de NUBL- 
BO, que excede en uno al 
número buscado. Antes de 
entrar en el bucle que bo- 
rrará todos los gráficos, ini- 
cializamos IX con TABLDI, 
tabla que tiene los datos de 
los sprites que fueron dibu- 
jados y ahora queremos bo- 
rrar, y HL con SPARES, don- 
de están almacenados uno 
detrás de otro los trozos de 
pantalla necesarios para 
efectuar el borrado. Ahora, 
si el contenido de NUBLBO 
era 1 , es que no habíamos 
dibujado ningún gráfico la 
última vez, y salimos del bu- 
cle sin haber entrado en 
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Ahora vamos, tomando de 
la tablo los datos necesa- 
rios. En DE cargamos la di- 
rección en la pantalla de 
trabajo donde comenzará 
el proceso. Ahora, en vez 
de cargar en registros, hay 
unos datos que los vamos a 
meter en una dirección de 
memoria, de tal manera 
ue luego serán recogidos 
¡rectamente por una ins- 
trucción del tipo LD C,n, 



siendo n el dato en cuestión. 
Este sistema les resultará fa- 
miliar a los que hayan leído 
los artículos sobre cómo se 
programa un juego, publi- 
cados en losMICROHOBBY 
97- 1 06, y escritos por el mis- 
mo autor. En BORPOI + 1 y 
en BORPOD + 1 guardamos 
la cantidad de bytes de an- 
cho que hemos de restau- 
rar. En AUMPOI + 1 y en 
AUMPOD+1, guardamos 



33 menos ese número, que 
será lo que hay que sumar 
a la dirección destino de la 
pantalla, tras restaurar un 
sean para lograr la direc- 
ción del siguiente. Por últi- 
mo, cargamos A con el nú- 
mero de scans que debemos 
restaurar. En BORPOI, aun- 
que veamos un LD C,0 es- 
tamos cargando C con el 
ancho del bloque a restaurar, 
pues es el valor que había- 



mos metido en BORPOI + 1 . 
Como en B teníamos 0, en 
BC tenemos el número de 
bytes a renovar; en DE te- 
nemos el destino, y el origen 
en HL, porque los trozos de 
pantalla que vamos a recu- 
perar han sido anteriormen- 
te guardados en SPARES, 
así que tenemos los pará- 
metros necesorios paro ha- 
cer un LDIR. Ahora calcula- 
mos lo dirección en panto- 
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Ha del siguiente sean, su- 
mándole al contenido de DE 
tras el ldir, el número cal- 
culado antes y metido en 
AUMPOI + 1 (por si no lo 
habéis notado, os diré que 
en la pantalla de trabajo, 
los scans están uno tras 
otro, a diferencia de cómo 
están en la pantalla del or- 
denador). Tras esto, cerra- 
mos el bucle para terminar 
con todos los scans. Ahora, 
nos queda restaurar los atri- 
butos. Para ello, cargamos 
en DE la dirección destino 
de atributos, y en A el nú- 
mero de filas que ocupa. 
Por lo demás, la restaura- 
ción de los atributos es idén- 
tica a la que acabamos de 
hacer. Tras restaurar por 
completo un trozo de pan- 
talla, cerramos el bucle que 
los restaurará todos. Ya he- 
mos terminado la primera 
de las subfases antes cita- 
das. 

Ahora continúamos por 
INSABO. Aquí hacemos un 
bucle en el que iremos mo- 
viendo todos los sprites y 
calculando los datos para la 
tabla TABLDI en los que es- 
tén en la pantalla. Dentro 
de este bucle, IY será el 
puntero para el elemento 
correspondiente al sprite 
dentro de la tabla de sprites 
TASPRI, IX el de TABLDI, y 
DE señalará la primera di- 
rección libre de la zona 
SPARES, pues en este bucle 
también será donde guar- 
daremos los trozos de pan- 
talla que hagan falta. Den- 
tro del bucle, lo que encon- 
tramos son llamadas a dos 
subrutinas. MOVERR se en- 
cargará de calcular las nue- 
vas coordenadas del sprite, 
teniendo en cuenta si se 
mueve en línea recta o se- 
gún trayectoria prefijada, y 
de calcular la fose de ani- 
mación en que se encuen- 
tra, si la tiene. CREADA 
crea el elemento en la tabla 
TABLDI y guarda los trozos 
de pantalla. 

Una vez guardados todos 



los trozos de pantalla, ya 
podemos dibujar los sprites 
en sus nuevas posiciones, 
llamando a DIBUJA, que se 
apoyará en los datos de 
TABLDI. Ahora, antes de 
volver, hacemos un rst 56 
para leer el teclado, y des- 
pués entramos en SALINT, 
donde se recuperan los re- 
gistros y se vuelve. Nótese 
que tal y como está puesto, 
y teniendo en cuenta que la 
fase de volcado de pantalla 
abarca el tiempo de dos in- 
terrupciones, la lectura del 
teclado se hará tres veces 
menos de lo normal. Esto 
hace que la respuesta del 
mismo al teclear sea bastan- 
te pobre, pero da un poco 
más de velocidad al no te- 
ner que ejecutarse tantas 
veces la subrutina de lectu- 
ra de teclado. Si pensamos 
usar los sprites desde Códi- 
go Máquina, podría ser útil 
quitar las líneas 96, 97 y 98 
para ahorrar aún más tiem- 
po. 

Y esto es todo el progra- 
ma principal. Ahora que- 
dan las subrutinas, que son 
cuatro: VUELCA, MOVERR, 
CREADA y DIBUJA. 

VUELCA es la que se en- 
carga de copiar la pantalla 
de trabajo en la pantalla del 
ordenador. Se trata del pro- 
ceso que más tiempo consu- 
me, ya que hay que mover 
casi 7 K. La rutina vuelca to- 
dos los scans de arriba a 
abajo, y por cada 8, vuel- 
ca una fila de atributos. 
Puede pareceros que sería 
más sencillo volcar primero 
toda la pantalla sin atribu- 
tos, y luego los atributos, 
pero el resultado sería que 
el movimiento quedaría mu- 
cho menos suave. Con este 
procedimiento habrá pe- 
queñas zonas de la panta- 
lla donde sprites parecerán 
doblarse; pero en la inmen- 
sa mayoría de los casos, lo 
suavidad de movimientos 
será perfecta. 

Veamos cómo funciona la 
subrutina. En los registros 



alternativos guardamos en 
HL el origen de pantalla de 
trabajo, y en DE el de la 
pantalla del ordenador, 
además de poner C a É) . En 
los registros normales pone- 
mos en HL el origen de los 
atributos de memoria, y en 
DE su correspondiente en la 
pantalla del ordenador. 
Asimismo, cargamos C con 
j) y B con 25 (estas dos últi- 
mas operaciones de una so- 
la vez. B será el contador 
del bucle que se repetirá 
pora cada fila, dentro del 
cual deberemos volcar ocho 
scans y una fila de atributos. 
El bucle se repetirá 22 ve- 



Fig. 6 

TABLA DE DATOS DE 

LOS GRÁFICOS 
QUE SE VAN A DIBUJAR 

Dirección Contenido 
relativa 

DIR + 0 Dirección de 

destino en pan- 
talla de 
memoria. 

DIR + 2 Dirección del 
gráfico. 

DIR + 4 Dirección de la 
máscara. 

DIR + 6 Número de 
scans. 

DIR + 7 Bytes de ancho. 

DIR + 8 Bytes que no 
entran en 
pantalla. 

DIR + 9 Bytede 
rotación. 

DIR+10 Bytede 
atributos. 

DIR+ 1 1 Dirección de 

destino en atri- 
butos de 
memoria. 

DIR + 13 Número de filas 
de atributos que 
ocupan el 
gráfico. 

DIR + 14 Número de co- 
lumnas de 
atributos. 



ees, a pesar de que iniciali- 
cemos B con 25. La razón 
es que, como veremos ense- 
guida, a cada paso por el 
bucle, el registro BC será 
decrementado 32 veces, asi 
que al final de las 22 veces 
que se repetirá el bucle, BC 
habrá sido decrementado 
en 22x32 = 704, con lo que 
B habrá sido decrementado 
en 3. Por tanto, deberemos 
empezar con B valiendo 3 
más de las veces que se re- 
pita el bucle. Dentro del bu- 
cle de las 22 filas, volvemos 
a los registros alternativos 
para volcar los scans. Car- 
gamos B con nueve para 
entrar en un bucle que se 
repetirá ocho veces, adivi- 
nad porqué. Dentro de es- 
te segundo bucle, traslada- 
mos los 32 bytes que com- 
ponen un sean de la panta- 
lla desde la idem de memo- 
ria a la real. Posiblemente 
os sorprenda que para esto 
utilicemos 32 instrucciones 
LDI. Pero resulta que esto es 
mucho más rápido que car- 
gar BC con 32 y hacer un 
LDIR, y además, así pode- 
mos utilizar el registro B co- 
mo contador. Estos DLIs y 
los que veremos a continua- 
ción son la causa de que en 
un bucle tengamos que car- 
gar B con 25 y en el otro 9 
en vez de 22 y 8 respectiva- 
mente. Tras esto, calcula- 
mos en DE la dirección del 
siguiente sean. Dentro de 
este bucle siempre vamos a 
pasar de un sean a otro de 
la misma fila, y, como mu- 
chos ya sabréis, el algoritmo 
para pasar de un sean a 
otro de la misma fila es sim- 
plemente incrementar el 
byte alto de la dirección. Pe- 
ro antes debemos restarle 
32, porque al hacer los LDIs 
es como si le hubiéramos su- 
mado 32. Como no hay re- 
gistros dobles libres, nos vo- 
temos de A para hacer la 
resta. Primero le restamos 
32 a E. Si no se nos produ- 
ce acarreo, la resta ya está 
bien hecha y procedemos a 
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animación y el tipo de mo- 
vimiento. Aislamos el color 
y lo guardamos en su lugar 
correspondiente en la tabla 
TABLDI. Ahora, si el movi- 
miento es en línea recta, sal- 
tamos a RECLIN. Si es en 
trayectoria prestablecida, 
cargamos en HL la direc- 
ción de los datos de la tra- 
yectoria. Leemos el valor 
contenido en esa dirección. 
Si es 127, la trayectoria ha 
finalizado y cargamos en 
HL la dirección inicial para 
volverla a repetir. Tanto si 
hacemos esto como si no, 
continuamos por NOFITA. 
Ahora comprobamos si el 
valor leído es un 1 26. En es- 
te caso, los dos siguientes 
bytes indicarán la nueva di- 
rección inicial de los gráficos 
correspondientes al sprite, y 
los pasamos a su lugar en la 
tabla TASPRI, para retroce- 
der a continuación a RECU- 
PE y leer un nuevo dato de 
la tabla de datos de la tra- 
yectoria. Cuando nos en- 
contramos con un dato que 
no es 127 ni 126, llegamos 
a TRANOR. Este dato será 
el incremento X, y lo pasa- 
mos a E, cargando A el si- 
guiente valor que será el in- 
cremento Y, tras actualizar 
el contador de trayectoria, 
saltamos a COCORE don- 
de nos reuniremos con la bi- 
furcación hecha en el caso 
de un movimiento en línea 
recta. En este caso saltába- 
mos a RECLIN. Aquí, car- 
gamos en E el incremento X 
y en A el Y, para entrar en 
COCORE con los mismo da- 
tos que si hubiéramos veni- 
do desde el caso de trayec- 
toria prefijada. En COCO 
RE, pasamos el incremento 
Y a BC. Hay que tener en 
cuenta que los incrementos 
son números con signo, y al 
pasarlos a un registro do- 
ble, el registro bajo deberá 
ser igual que el byte de in- 
cremento, pero el alto, de- 
berá ser 0 para un incre- 
mento positivo y 255 para 
un incremento negativo. Es- 



to lo conseguimos con el CP 
128 y el CCF, que pone el 
banderín de acarreo alzado 
para un número negativo, y 
el SBC A,A, que dejará en 
A un 0 si el acarreo estaba 
bajo, y un —1 (un 255) si es- 
taba alto. Este incremento, 
una vez convertido en un 
número de 1 6 bits, se lo su- 
mamos a la coordenada Y, 
y guardamos la nueva coor- 
deanda. A continuación, 
hacemos lo propio con la X. 
Ya hemos actualizado las 
coordenadas. Ahora vamos 
a pasar a calcular qué grá- 
fico hay que dibujar, de los 
varios que puede tener un 
sprite, para lo cual tendre- 
mos que tener en cuenta la 
fase de animación. Por eso 
cargamos en E el número 
total de fases de animación 
y en A la fase en la que es- 
taba la última vez. Ahora 
saltamos a ADETRA si la 
animación es del tipo 
adelante-atrás. Si es cíclica, 
simplemente incrementamos 
la fase, y si hemos llegado 
a la última, la ponemos a 0 . 
Después saltamos a TRA- 
REN. Nótese que en la ani- 
mación cíclica, coinciden la 
fase actual con el gráfico 
que hay que dibujar. Esto 
quiere decir que si la fase es 
0 habrá que dibujar el pri- 
mer gráfico, si es 1, el se- 
gundo, etc. En ADETRA tra- 
tamos la animación de 
adelante-atrás. En este tipo 
de animación, si por ejem- 
plo, tenemos cinco gráficos 




distintos para la animación, 
primero habrá cinco fases 
que coincidirán con las de la 
cíclica. Pero después, habrá 
tres más en las que se dibu- 
jarán los tres gráficos del 
centro en orden inverso: 
primero el cuarto, luego el 
tercero, y después el segun- 
do. En general, si hay N 
gráficos distintos, la canti- 
dad de fases por las que pa- 
saremos será de 2*N-2. Por 
eso ADETRA, tras incremen- 
tar el contador de fase, le 
restamos ese número. Si el 
resultado es 0, el ciclo ha- 
brá terminado y comenza- 
remos de nuevo por la fase 
0. Pero antes hemos guar- 
dado el resultado de la res- 
ta. Ahora tenemos que cal- 
cular qué es el que hay que 
dibujar. Si la fase actual es 
menor que la cantidad de 
gráficos distintos que hay, 
nos encontramos en la par- 
te que es igual que en la 
animación cíclica, por lo 
que la fase es igual al núme- 
ro del gráfico. En caso con- 
trario, bastará que calcule- 
mos 2*N-2-fase actual, pe- 
ro eso es lo que habíamos 
calculado antes, salvo que 
con signo contrario así que 
en PARETR lo recuperamos 
(había sido guardado en 
PARETR + 1 ), lo cambiamos 
de signo y continuamos por 
TRAREN como en los otros 
casos. En TRAREN, carga- 
mos DE con la cantidad de 
memoria que ocupa cada 
gráfico, y la multiplicamos 
por dos caras para calcular 
la que ocupa cada gráfico 
con su mascara. Este es el 
valor que le tendremos que 
sumar a la dirección del pri- 
mer gráfico del sprite tantas 
veces como indique el con- 
tenido de A. Tras hacer es- 
to, guardamos la nueva di- 
rección del gráfico en el lu- 
gar que le corresponde en 
íá tabla TABLDI. Y esto es 
todo lo que hace MOVERR. 

Llegamos ahora a CREA- 
DA, posiblemente, la subru- 
tina más complicada. Bási- 




camente, lo que se hace en 
ella es averiguar si hay que 
dibujar todo el gráfico, o és- 
te se encuentra parcialmen- 
te en la pantalla, y calcular 
todos los datos para que 
luego DIBUJA se encargue 
ya de dibujar los gráficos. 
Lo primero que hacemos es 
calcular qué tabla de rota- 
ciones de las cuatro existen- 
tes es la que vamos a utili- 
zar. En realidad, lo que cal- 
culamos es el byte alto de su 
dirección de inicio (el bajo 
es 0). Tras guardar esto en 
su lugar, comprobamos si la 
coordenada X es positiva y 
menor de 256. En este caso 
saltamos a XPOSIT. En ca- 
so contrario, si no es mayor 
de — 256, retornamos inme- 
diatamente, pues el sprite se 
encuentra fuera de la pan- 
talla. Cuando es negativa 
mayor que —256, compro- 
bamos si es mayor o igual 
que —6, en cuyo caso, el 
trozo del gráfico que no se 
ve en pantalla será menor 
de un carácter. Esto quiere 
decir que habrá que dibujar 
el gráfico entero, pero em- 
pezando en la columna so- 
brante de la pantalla de 
memoria, para que quede 
aquí el trozo que no se ve- 
rá en pantalla. Por eso car- 
gamos en BC ORIGSC-1 y 
en HLORIGAT— 1. Es en es- 
tos registros donde vamos a 
construir las direcciones des- 
tino del gráfico en la panta- 
lla de trabajo y en los atri- 
butos de la misma. Como 
hemos dicho que dibujare- 
mos el gráfico entero, hace- 
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mos que el ancho del gráfi- 
co en la pantalla sea igual 
al ancho del gráfico en sí, y 
que el número de bytes de 
ancho que no entran en la 
pantalla es 0. Tras esto sal- 
tamos a PARTEY para hacer 
cálculos similares con la 
coordenada Y. Continua- 
mos en NEGARE, a donde 
llegamos cuando la coorde- 
nada X es mayor que —256 
pero menor que —6. Como 
las dimensiones de los grá- 
ficos en la magnitud X vie- 
ne dada en caracteres, va- 
mos a pasar esta coordena- 
do X de alta a baja resolu- 
ción, para lo cual la dividi- 
mos por 8, teniendo en 
cuenta que se trata de un 
número negativo, y por lo 
tanto, los bits que entren 




por la izquierdo deben ser 
unos y no ceros. A esta 
coordenado en baja resolu- 
ción, le sumamos el ancho 
del gráfico. Si el resultado 
es cero o ni siquiera llega, 



es porque el sprite está com- 
pletamente fuera de la pan- 
talla, y retornamos ensegui- 
da. Si el resultado excede 
de cero, coincidirá con la 
cantidad de caracteres de 
ancho que del gráfico ca- 
brán en la pantalla, y lo 
guardamos en su lugar en 
TABLDI. Ahora si que hay 
un trozo del gráfico que no 
se dibuja por estar fuera de 
la pantalla. El ancho de es- 
te trozo será igual a la coor- 
denada en baja resolución 
del sprite, sólo que cambia 
de signo. Pero pora esos 
bytes que no se van a dibu- 
jar sean tomados de lo de- 
recha, como debería ser, y 
no de la izquierda, este nú- 
mero no sólo lo guardare- 
mos en IX + 8, sino que se lo 
sumaremos a la dirección 
de comienzo del gráfico. 
Por último, cargamos en BC 
y HL, ORIGSC-1 y 
ORIGAT— 1 respectivamen- 




te, para que, como antes, el 
trozo del primer byte a di- 
bujar que no debe salir en 
pantalla, quede en la co- 
lumna extra. Pero si el grá- 
fico empieza justo en la po- 
sición de un carácter, no ha- 
brá ningún byte que quede 
a medias entre dos direccio- 
nes, o lo que es lo mismo, el 
primer byte a dibujar del 
gráfico quedará completa- 
mente dentro de la panta- 
lla, por lo que hacemos que 
BC y HL incrementen en uno 
sus valores antes de saltar a 



PARTEY. Seguimos ahora 
por XPOSIT. Aquí la coor- 
denada X estará entre 0 y 
255, y pueden ocurrir dos 
casos: que el sprite quede 
totalmente dentro o que se 
salga parte por la derecha. 
Vamos a comprobarlo. Si la 
X es 0, consideramos desde 
el principio que el sprite es- 
tá totalmente dentro de la 
pantalla. En caso contrario, 
calculamos la columna en 
baja resolución donde ter- 
minaría, el dibujo. Si no lle- 
ga a 33, el gráfico cabe en- 
tero. En caso contrario, al 
valor obtenido le restamos 
32 y ya tenemos cuantos 
bytes de ancho no tienen 
que ser dibujados. Lo resta- 
mos del ancho del sprite y 
obtenemos cuántos han de 
serlo. En RECOIN calcula- 
mos la dirección destino en 
la pantalla de trabajo y sal- 
tamos o PARTEY. En INTE- 
GE, lo único que hacemos 
es indicar que el ancho del 
gráfico que cabe en panta- 
lla es igual al ancho total de 
éste y que el ancho de la 
parte que no cabe es 0, y 
después retrocedemos a RE- 
COIN paro calcular la di- 
rección de la pantalla de 
trabajo. Y llegamos a PAR- 
TEY. Aquí se hace lo mismo 
que acabamos de hacer con 
la X, asi que no la vamos a 
comentar tan en detalle, si- 
no sólo a ver las diferencias. 
Aquí, cuando un sprite no 
está completamente en la 
pantalla, no necesitamos 
calcular nada más que 
cuantos scans quedan den- 
tro, y no cuántos fuera, 
aunque cuando se sale por 
arriba, igual que cuando 
con la X se salía por la iz- 
quierda, habrá que modifi- 
car la dirección de comien- 
zo del gráfico, sumándole el 
ancho del gráfico tantas ve- 
ces como scans quedan fue- 
ra de la pantalla. Lo único 
que se hace y que no se ha- 
cía con la X es calcular 
cuántas filas de atributos 
ocupa el gráfico. En el caso 



de un gráfico que se sale 
por arriba o por abajo, co- 
gemos el número de scans 
que caben en pantalla, lo 
dividimos por 8, y si no re- 
sultado exacto, al cociente 
le sumamos 1 y nos olvida- 
mos del resto, y ese cocien- 
te será lo que buscábamos. 
En el caso de un sprite que 
cabe completamente en la 
pantalla, se calcula la fila de 
la pantalla dentro de la que 
está el primer sean del grá- 
fico, y la fila dentro de lo 
que esta el último, se restan, 
se le suma 1 y obtenemos el 
resultado deseado. Conti- 
nuaremos ahora la explica- 
ción más detalladamente 
desde COYPOS. En primer 
lugar, guardamos en su lu- 
gar correspondiente en la 
tabla la dirección de la pan- 
talla de memoria a la que 
va a ir el gráfico. A conti- 
nuación calculamos la direc- 
ción de la máscara a partir 
de la dirección del gráfico y 
de la memoria ocupada por 
un gráfico. Ahora calcula- 
mos cuántas columnas de 
atributos ocupa el gráfico, si 
está en el principio de una 
columna, ocupará tantas 
columnas como su ancho en 
caracteres, pero en caso 
contrario, ocupará una 
más. Ahora recuperamos 
de la pila a DE y HL (que 
han sido guardados en el 
fragmento de listado que no 
hemos visto con detenimien- 
to), y volvemos a guardar 
HL Tras meter la dirección 
de atributos en su sitio y 
aumentar en 1 el contenido 
de la variable NUBLBO pa- 
ra indicar que hay un sprite 
más para dibujar, llegamos 
a las líneas que se encargan 
de guardar en SPARES (re- 
cuérdese que DE apunta a 
SPARES) cada uno de los 
trozos de pantalla donde 
luego van a ir los sprites. 
Tampoco necesitan comen- 
tarios, pues son práctica- 
mente idénticas a las que to- 
maban estos trozos de SPA- 
RES y los copiaban en la 
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> ©0D8083D20E90BC921B9 
) F722B7F7219EF722ERF2 
i CDCFF2D021C0F722B7F7 

*i 21RRF722ERF278CDB3F7 

22 EB79CDB3F7R7ED52783B 

3 087C2F677D2F6F2379CD 

l C7F7C300000000000000 

> 00F3F5C5D5ESODESD9O8 
«¿ F5C5D5E5FDES3R9CF7R7 

27 C213F3CDRFF33E01329C 

28 F7C39EF32128D1RF329C 

29 F73R9DF7DD2129D03D28 

30 4R08DD5EO0DD5601DD7E 

31 0E3244F3325RF3ED44C6 

32 213248F332SEF3DD7E06 

33 06000E00EDB00E00EB09 

34 EB3OC243F3O07EO0DD5E 

35 0BDDS60C0E00EDB00EO0 

36 EB09EB3DC259F30E0FDO 

37 0908C321F33E01329DF7 

38 1128D1DD2129D0FD2108 

39 CF3R815C47R72814C5D5 

40 CD5FF4D1CD1BF5011100 

41 FD09C 1 10EFCDE5F6FDE 1 

42 FOE5FFFOE1E1D1C1F108 

43 D9DDE 1E1D1C1F1FBED4D 

44 2128D51100400E00D921 

45 E8ED110058010019D906 

46 09EDR0EDR0EDR0EDR0ED 

47 R0EDROEDR0EDR0EDR0ED 

48 ROEDR0EDR0EDR0EDR0ED 

49 R0EOR0EDR0EDR0EDR0ED 

50 R0EDR0EDR0EDR0EDR0ED 

51 R0EDR0EDR0EDR0EDR0ED 

52 R0EDR0EDR07BD6205F36 

53 01142310B67BC6205F38 

54 047RD60857D9EDR0EDR0 

55 EDROEDR0EDR0EDR0EDR0 

56 EDR0EDR0EDR0EDR0EDR0 

57 EDR0EDR0EDR0EDR0EDR0 

58 EDR0EDR0EDR0EDR0EDRO 

59 EDR0EDR0EDR0EDR0EDR0 

60 EDR0EDR0EDR0EDR0EDR0 

61 2305C2C1F3C9FD7E05FE 

62 7FC8FD7E0957E647OD77 

63 0RCB6P2831FD6E0DFD66 

64 0E7EFE7F&007FD6E0RFD 

65 660B7EFE7E200E237EFD 



1134 

1164 

621 

1096 

97S 

935 

644 

1098 

444 

1060 

718 

1353 

1646 

1044 

935 

1048 

1072 

980 

1659 

1798 

1711 

1641 

926 

641 

1802 

199* 

1348 

1506 

1313 

1052 

1261 

1138 

691 

1475 

771 

1316 

1005 

1063 

1194 

1248 

1868 

2091 

2096 

631 

823 

1834 

1985 

1985 

1985 

1985 

1985 

1474 

758 

1446 

1985 

1985 

1985 

1985 

1985 

1965 

1509 

1443 

1131 

1186 

1079 



66 7700237EFD770123C378 

67 F45F237E23FD750DFO74 

68 0EC3RRF4FD7E0R5FFD7E 

69 0B4FFE803F9F47FD6E06 

70 FD660709FD7506FD7407 

71 7B4FFE803F9F47FD6E04 

72 FD660509FD7504FD7405 

73 FO7E0CFD5E08CB5RC2E7 

74 F43CBB2001RFFD770CC3 

75 FDF43C579393C60232FR 

76 F428017RFD770CBB3804 

77 3E00ED44FDSE0FFD5610 

78 CB23CB12FD6E00FD6601 

79 R72804471910FDDD7502 

80 DO7403C9FD7E044FE6O6 

81 C6F8DD7709FD7E05R728 

82 4D3CCO79C6O6301321E7 

83 ED0127D5FD7E02OD7707 

84 RFOD7706C3C1F5371FC8 

85 2FCB2F47FD8602O0C8DD 

86 770778ED44DD7708DD86 

87 02OD77023E0ODD8E03DD 

88 77037921E7ED0127DSE6 

89 06204O2303C3C1F579O6 

90 013836CB3FCB3FCB3FFD 

91 86O2FE213829D620DD77 

92 '08ED44FD8602DD770779 

93 CB3FCB3FCB3F4F2 1E8ED 

94 8S6F8C9567790128D581 

95 4F889147C3C1F5FD7E02 

96 DD7707RFOD7708C39BF5 

97 FD7E07R7283B3CCerO7E 

98 06FD8603D0C8DD77O6ED 

99 44FD8603E5D5DD6E02OD 

100 66031600FD5E02193DC2 

101 E6F5DO7S02OD74O3OO7E 

102 06C607CB3FCB3FCB3FDD 

103 770DC376F6FO7E06FEC0 

104 D0CB3FCB3FCB3FC50121 

105 0O3C3D280409C313F6C1 

106 E5D56069112100FD7E06 

107 R72807193DC228F6444O 

108 FD7E06FD8603382CFEU1 

109 3028FD7E03DD77067908 

110 FD4E06CB39CB39CB39FD 

111 7E06FO8603C607CB3FCB 

112 3FCB3F91DD770D084FC3 

113 76F63EC0FD9606DD77O6 

114 C607CB3FCB3FCB3FOD77 

115 0DDD7100DD7001DD6E02 

116 DD6603FD5E0FFD561019 

117 DD7504OD7405DO5607DD 

118 7E09E60628O114DD72OE 

119 D1E1E5DD750BDD740C60 

120 69DD7E0E32C8F632D6F6 

121 E044C62132CCF632DOF6 

122 3R9OF73C329DF7DO7E06 

123 06000E00EDB00E00093D 

124 20F6E1DD7E0D0E00EDB0 

125 0E00093DC2D5F60E0FOD 

126 09C9DD2129D03R9DF73D 

127 C8F5DO5E00DDS601DO66 

128 092EFF7E32S5F7247E25 

129 3228F7D9DD6E03PD6603 

130 EÍF0E1DD6E0-1I 

131 7E07323FF7£D44C6213¿ 

132 5BF7DD4E06DD5E081600 



1003 

1287 

1486 

1134 

1123 

1244 

1117 

1464 

1278 

1438 

1038 

1084 

1178 

916 

1239 

1386 

985 

1218 

1445 

1386 

1254 

993 

1227 

1121 

1162 

1106 

1170 

1379 

1140 

1445 

1462 

1283 

1387 

1454 

756 

1502 

1230 

1522 

1237 

827 

1078 

925 

1322 

945 

1370 

1196 

1109 

1373 

1343 

1014 

1068 

1219 

781 

1457 

1472 

1550 

1329 

517 

1290 

987 

1236 

1391 

1017 

1216 

1591 

1063 

983 



133 D9010000D906O0FD7E00 820 

134 FD23087E23D96F7EB124 1124 

135 4E086F784625B66F08EB 960 

136 R6B37723EBD910E119FD 1470 

137 19O979F60OEBR6B0773E 1367 

138 00856F8C9S67EBD90DC2 1295 

139 29F7DD6E0BDD660CDD7E 1312 

140 0E3284F7ED44C621328D 1170 

141 F7DDSE0R16B8DO7E0D08 1146 

142 06007ER2B3772310F90E 906 

143 0009083DC282F7F10E0F 919 

144 DD09C3ECF60001FO5E02 1257 

145 CB23CB23CB23C3RDF7FD 1582 

146 5E031600R7EO52C9CDC7 1210 

147 F7C30000FD6E04FD6605 1169 

148 C9FD6E06FD6607C9FD21 1419 

149 08CFR7C8O5111100FD19 1107 

150 3D20FBD1C90000000000 754 




DUMP: 40.000 J 

N.° BYTES: 1.49 



CONTROL o C 
DE SPRITES JLD 






último, en DE cargamos el 
número de caracteres de 
ancho que no vamos a di- 
bujar del sprite. Sobre LOS- 
CAN se cerrará el bucle pa- 
ra cada sean. 

Aquí intercambiamos los 
registros. Ahora tenemos 
que tener bien claro cuál es 
el proceso a seguir para di- 
bujar cada sean. Cada byte 
del gráfico tendrá que ser 
colocado entre dos direccio- 
nes de memoria dentro de 
la pantalla. Por tanto, en 
una dirección de la panta- 
lla entrarán fragmentos de 
dos bytes del gráfico. Sa- 
biendo que la tabla de ro- 
taciones nos da por un lado, 
la parte del byte del gráfi- 
co que va en la dirección de 
pantalla actual y por otro 
lado la parte irá en la mis- 
ma dirección que la prime- 
ra parte del siguiente byte 
de gráfico, el proceso para 
cada byte seria: obtener la 
primera parte del byte. Jun- 
tarla con la segunda parte 
del anterior byte. Almace- 
nar el resultado en pantalla. 
Obtener la segunda parte 
del byte y guardarla para 
su uso con el byte siguiente. 
En realidad, seria un poco 
más complicado, pues hay 
que hacer esto para el byte 
del gráfico y para el de la 
máscara. El paso descrito 
como guardar el resultado 
en pantalla, será en reali- 
dad hacer un AND de lo 
contenido en pantalla con el 
resultado de la máscara, a 
continuación hacer un OR 
con el resultado del gráfico 
y por último almacenar el 
resultado en pantalla. A 
partir de ahora, para inten- 
tar clarificar un poco las co- 
sas, vamos a llamar Bl , Cl , 
etc., a los registros del jue- 
go que hemos inicializado 
primero, es decir, en el que 
DE tiene la dirección de la 
pantalla y HL la de la tabla 
de rotaciones, y B2, C2, 
etc., a los del otro juego, es 
decir, en el que HL contine 
la dirección de la máscara 



Actualidad, pokes, mapas, trucos, 
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y DE el número de bytes que 
no hay que dibujar. Para 
guardar la segunda parte 
del byte del gráfico, utiliza- 
remos Bl para el gráfico y 
Cl para la máscara. Pero 
en el caso del primer byte 
de un sean, estos registros 
no podrán contener la se- 
gunda parte del byte ante- 
rior, porque éste no exis- 
te. Por esto, lo que hacemos 
es invertarnos un byte an- 
terior, que para que no 
afecte al dibujo debe ser 0 
para el gráfico y 255 (una 
vez girado y tomada su se- 
gunda parte) para la más- 
cara. 

Estos son los valores que 
debemos cargar en Bl y Cl 
antes de entrar en el bucle 
para todos los bytes de un 
sean, y lo hacemos en POS- 
NUM (recuérdese que pre- 
viamente habíamos carga- 
do en POSNUM I 1 la se 
gunda parte del resultado 
de rotar 255). Ahora volve 
mos al juego de registros 2, 
e inicializamos B2 que va a 
ser el contador del bucle pa- 
ra los bytes de un sean (el 
número de sean lo había- 
mos puesto en POSBYT + 1). 
Sobre LOBYTS se cerrará el 
bucle. Aquí, guardamos en 
A' el byte del gráfico y en A 
el de máscara. Volvemos ai 
juego 1 . Cargamos en A la 
primera parte del byte de 
máscara y la juntamos con 
la segunda del byte an- 
terior que estaba en C, 
y después cargamos en 
C la segunda parte del 
byte actual. Ahora pa 
somos a A el byte del 
gráfico y después a L 
para calcular la direc- 
ción correspondiente 
en la tabla de rota- A 
ción. Como he- 
mos incremen- 
tado H, HL es- 
tará apuntando 
a la segunda 
parte del byte, y 
no a la primera. 

Cargamos en 
A la segunda 



parte del byte anterior y en 
B la de éste para usarlo la 
próxima vez. 

Ahora decrementamos H 
y juntamos la segunda par- 
te del byte anterior, que es- 
tá en A con la primera de 
éste. Lo guardamos tempo- 
ralmente en L y obtenemos 
la máscara, hacemos el 
AND con la pantalla, el OR 
con el gráfico y lo guarda- 
mos en la pantalla. Ahora 
volvemos al juego 2 para 
cerrar el bucle de cada byte 
de un sean. Súmanos DE a 
HL e IY para saltarnos la 
parte del gráfico que no ha 
de ser dibujada y de nuevo 
al juego 1 . Ahora tenemos 
que dibujar la segunda par- 
te del último byte del sean 
aue no ha sido dibujada 
dentro del bucle. Al igual 
que como ocurría con el pri- 
mer sean, con este último 
debemos inventarnos un 
byte siguiente, del que el 
gráfico seo 0 y la máscara 
255. En PONUDO junta- 
mos la primera parte del 



imaginario byte de másca- 
ra (colocada anterior- 
mente en PONUDO I 1) 
con la segunda del byte que 
ha quedado sin dibujar. Ha- 




cemos el AND con la pan- 
talla y el OR con el gráfico 
y lo metemos en pantalla. 
Ahora le sumamos a la di- 
rección de pantalla el valor 
necesario para calcular la 
dirección del siguiente sean 
(dicho valor se encontraba 
en SUMVAL + 1). 

Por último, sólo nos que- 
da volver al juego 2 y cerrar 
el bucle de los scans. Aho- 
ra nos queda dibujar los 
atributos. Para ello, carga- 
mos en HL la dirección des- 
tino de los atributos en la 
pantalla de memoria, en 
ATDIRG+1 el número de 
columnas que hay que relle- 
nar , en SUMATT ♦ 1, 33-el 
número anterior (ya debe- 
ríais saber paro qué lo va- 
mos a utilizar), en E el byte 
de atributos, en D una más- 
cara para las partes del atri- 
buto de la pantalla que no 
deben cambiar (el papel y 
el flash), y en A el número 
de filas a rellenar. En 
ATLAFX se cierra el bucle 
para cada fila, y en ATBL- 
Dl el de cada byte de la fi- 
la. Dentro de éste, tomamos 
el byte de atributos de la 
pantalla, nos quedamos con 
el PAPEL y el FLASH me- 
diante un AND D, lo ¡unta- 
mos con INKy BRlGHTy lo 
guardamos en la pantalla. 
Por lo demás, es práctico- 
mente idéntico este proceso 
al de volcar los atributos de 
pantalla a SPARES o de 
SPARES a pantalla, que ya 
ha sido visto. Tras dibujar 
los atributos, recuperamos 
A, que nos decía cuántos 
gráficos había que dibujar, 
y actualizamos IX para que 
apunte al siguiente elemen- 
to. 

Con esto hemos termina- 
do todo lo relacionado con 
el programa principal. Lo 
único que quedan son las 
tres subrutinas anexas, INI- 
CIO, DESACT y COMCHO, 
que son tan sencillas y poco 
interesantes y que no mere- 
cen una explicación a fon- 
do. 




LISTADO ENSAMBLADOS C 



SUGERENCIAS Y 
ADVERTENCIAS 

Tal y como está, la zona 
de pantalla sobre la que se 
dibujan los sprites es toda la 
parte superior de ésta, las 
22 lineas, pero no hay ra- 
zón para que la zona usa- 
da tenga la altura que que- 
ramos. Por ejemplo, pode- 
mos reservar los dos tercios 
superiores para la pantalla 
de juego y utilizar el tercio 
inferior para marcadores y 
otras cosas. Cuanto más pe- 

3ueña sea la zona destina- 
a a sprites, mayor será la 
velocidad a la que vayan 
nuestros programas. Los 
ajustes que deberemos ha- 
cer son los siguientes: Si 
queremos que la zona en la 
que aparezcan los sprites 
tenga un alto de N filas, 
tendremos que hacer POKE 
62400, X, donde X es igual 
a N + 1 si N está entre 1 y 
8, a N + 2 si N está entre 9 
y 1 6, y a N + 3 si N es ma- 
yor de 16. Si no queremos 
que esta zona empiece jus- 
to arriba de la pantalla po- 



demos pokear en las direc- 
ciones 62387 y 62388 la di- 
rección de la pantalla del 
ordenador dónde quere- 
mos que empiece, y en 
62396 y 62397 la dirección 
de atributos. 

Es necesario advertir que 
si usamos demasiados spri- 
tes o demasiado grandes, se 
puede producir el bloqueo 
del ordenador. La única so- 
lución a esto, como ya he- 
mos dicho, es cambiar en el 
listado Ensamblador la ubi- 
cación de la zona SPARES. 

Por último advertirles a 
los usuarios del Spectrum 
1 28 o +2 que el programa 
funcionará perfectamente 
en modo 48 K, pero en 1 28 
sólo funcionará si no inten- 
tamos interrumpir el pro- 
grama con las interrupcio- 
nes activadas, pues en este 
momento se bloqueará el 
ordenador. 

Esperamos que este pro- 
grama os sea de utilidad y 
consigáis con él hacer pro- 
gramas de calidad comer- 
cial. 



II t(H 






771 


1NSA60 LD 


A.J 


21 «C- 






781 


LD 


MUO)/ 


3* ; 






798 


ID 


DE, SPARES 


« ; 


SPRITES POR 


811 


LD 


IX.TABLDI 


51 ; 






811 


LD 


IY.TASPRI 


41 ; 


INTERRUPCIONES 


821 


LD 


A.(NWSPR) 


71 ; 






831 


LO 


8, A 


8» ; ' 


OR PABLO ARI2A. 


841 


ANO 


A 


91 ; 






851 


JR 


2, NOSPRI 


iil ; 






841 lttttlN PUSH BC 


til 


ORG 


42194 


871 


PUSH DE 


121 ; 






881 


CALI MOVERA 


131 ; 






891 


POP 


DE 


MI ENTINT DI 




911 


CALL CREADA 


151 


PUSH Af 


911 


LD 


BC.I7 


141 


PUSH BC 


921 


ADO 


1Y.BC 


171 


PUSH DE 


931 


POP 


BC 


181 


PUSH Hl 


941 


DJN2 


1NMA1N 


191 


PUSH IX 


951 


CALL DIBUJA 


211 


EXX 




941 NOSPRI POP 


1Y 


211 


EX 


Af.AT 


971 


push ir 


221 


PUSH Af 


981 


RST 


54 


231 


PUSH BC 


991 SALIN! POP 


IY 


241 


PUSH DE 


lili 


POP 


HL 


251 


PUSH HL 


lili 


POP 


DE 


241 


PUSH IY 


1121 


POP 


BC 


271 


LD 


A .(ESTADO) 


1131 


POP 


Af 


281 


ANO 


A 


1141 


EX 


AF.AF' 


m 


JP 


N2, NOVOLC 


1151 


EXX 




311 


OUL VUELCA 


1141 


POP 


IX 


311 


LD 


A.l 


1171 


POP 


HL 


321 


LD 


(ESTA00),A 


1181 


POP 


DE 


331 


JP 


SALI NT 


1191 


POP 


BC 


341 ; 






lili 


POP 


Af 


351 NOVOLC LD 


Hl, SPARES 


lili 


El 




341 


XOR 


A 


1121 


RETI 




371 


LD 


(ESTADO), A 


1131 






381 


LD 


A,(NU8L80) 


1141 






391 


LD 


IX.TA6LDI 


1151 VUELCA LO 


HL.0R16SC 


411 1NB0T0 DEC 


A 


1141 


LD 


DE. 14384 


411 


JR 


MNSABO 


1171 


LD 


c,i 


421 


EX 


Af.AT 


1181 


EXX 




431 


LD 


E,(IX«I) 


1191 


LD 


HL.0R1GAT 


441 


LO 


D,(1X«1) 


1211 


LD 


DE, 22528 


451 


LD 


A, (1X04) 


1211 


LD 


BC. 25*254 


441 


LO 


<B0RP01M),A 


1221 


LVOLCA EXX 




471 


LD 


(B0RP00O),A 


1231 


lo 


8,9 


481 


NEG 




1241 LOPMU LDI 




491 


A00 


A, 33 


1251 


LO) 




511 


LD 


(AWP0M>,A 


1241 


LOI 




5)1 


LD 


<AUNP0D«1>,A 


1271 


LDI 




521 


LD 


A,(1X*4> 


1281 


LOI 




531 


LD 


8,1 


1291 


LDI 




541 BORP 


01 LO 


c,i 


1311 


LOI 




551 


L01R 




1311 


LDI 




541 AIKPOI LO 


c,i 


1321 


LOI 




571 


EX 


DE.HL 


1331 


LDI 




581 


A00 


HL.BC 


1341 


LOI 




591 


EX 


DE.HL 


1351 


LDI 




411 


OEC 


A 


1341 


LOI 




411 


JP 


N2.B0RP0I 


1371 


LDI 




421 


LO 


A,(IX«I3) 


1381 


LOI 




431 


LO 


E,(IX«II) 


1391 


LDI 




441 


LO 


D,(1X«I2) 


1411 


LOI 




451 B0RPO0 LD 


CI 


1411 


LOI 




441 


LDIR 




1421 


LOI 




i7i Mmi .. 


C,l 


1431 


LOI 




481 


EX 


DE.HL 


1441 


LDI 




491 


ACO 


KL.BC 


1451 


LOI 




711 


EX 


OE.HL 


1441 


LOI 




711 


DEC 


A 


1471 


LOI 




721 


JP 


NZ.BORP00 


1481 


LOI 




731 


LO 


C.15 


1491 


LDI 




741 


AOD 


IX, BC 


1511 


LOI 




751 


EX 


Af .AF 


1511 


LOI 




741 


JP 


IN80TO 


1521 


LOI 





R DE MANEJO DE PANTALLAS 



ISM 


LDI 




2291 


LD 


A,(KL) 


3154 ; 






3811 


SUB 


c 


4571 


SRL 


C 


1341 


LD1 




2311 


LO 


(IY«I),A 


3461 CREADA LO 


A,<IY«4) 


3821 


LD 


B.A 


4581 


SRL 


C 


155* 


KÜ 




2311 


INC 


HL 






C.A 


3831 


JP 


PARTEY 


4591 


LO 


A,(1Y*4> 


ISM 


LO 


M 


2321 


LO 


A,(HL) 






6 


3841 INTE6E LD 


A,(IY«2) 


4641 


ADO 


A,(1Y*3> 


1571 


SUB 


32 


2331 


LO 


OYO), A 






A, 248 


3851 


LD 


<IX*7),A 


4411 


AOO 


A, 7 


ISM 


LD 


E,A 


2341 


INC 


HL 






<)X«9) ,A 


3864 


m 


A 


4621 


SRL 


A 


1991 


JR 


CNOINCD 


2351 


JP 


RECUPE 


MM 


in 


A,(IY*5) 


3871 


LD 


(IX*8),A 


4431 


SRL 


A 


1411 


INC 


0 


2341 TRANOR LO 


E,A 


~2 




A 


3881 


JP 


RECOIN 


4641 


SRL 


A 


1411 NOINC0 INC 


HL 


2371 


INC 


HL 




10 


| XPOSIT 


3891 PARTEY LD 


A,(IY*7> 


4651 


SUB 


C 


\m 


DJNZ 


LDPPNU 


2381 


LD 


A,<HL) 




IMT 


A 


3911 


AHI 


A 


4664 


LD 


<1X*13),A 


\m 


LO 


A,E 


2391 


INC 


HL 




OCT 


N2 


3911 


JR 


2.YP0S1T 


4471 


EX 


AF.AF' 


1441 


AOD 


A, 32 


2411 


LO 


(IY*13),L 


\ é 




A,C 


3921 


INC 


A 


4681 


LD 


C,A 


1451 


LO 


E,A 


2411 


LO 


(IY*14),H 


1 Ti 


ADO 


A, 4 


3931 


m 


N2 


4691 


JP 


COYPOS 


1441 


JR 


C, SITERC 


2421 


JP 


COCORE 


MM 

3)84 


JR 


NC .NEGARE 


3941 


LD 


A,(IY*4) 


4711 MOSCAB LD 


A, 192 


1471 


LD 


A,D 


2431 


RECLIN LD 


A,(IY*1I) 


3191 


LD 


HL.0RI6AT-1 


3951 


m 


A,UY*3) 


4711 


SUB 


<IY*4) 


I4M 


SUB 


8 


2441 


LD 


E,A 


3211 


LD 


BC.ORIGSC 1 


3941 


m 


NC 


4721 


LD 


<1X«4),A 


6*1 


LD 


D.A 


2451 


LD 


A,(1Y*II) 


3211 


LD 




3971 


m 


z 


4731 


ADO 


A, 7 


1711 SITERC EXX 




2441 COCORE LD 


C,A 


3221 


LD 


<ÍX«7) ,A 


3981 


LD 


(IX«4),A 


4741 


SRL 


A 


1711 






2471 


CP 


128 


3231 


XOR 




3991 


m 




4751 


SRL 


A 


i tu 


LDI 




2481 


CCF 




3241 


LD 


<1X*8) A 


4111 


m 


A,(1Y*3) 


4744 


SRL 


A 


1731 


LDI 




249* 


S8C 


A, A 


3251 


JP 


PARTEY 


4111 


PUSH HL 


4771 


LO 


<IX*13>,A 


1741 


LDI 




25»» 


LO 


8, A 


3261 NEGARE SCF 


4121 


PUSH OE 


4781 COYPOS LO 


<IX*I),C 


i m 


LDI 




2511 


LD 


L,<1Y*6> 


3271 


RRA 




4131 


LD 


L,(1X*2) 


4791 


LD 


(IX*1),8 


i tu 


LDI 




2521 


LO 


H,(1Y*7> 


3281 


SRA 


A 


4141 


lD 


H,(]X*3) 


4811 


LD 


1,<1X*2) 


1771 


LDI 




2331 


ADO 


HL.BC 


3291 


SHA 


A 


4151 


LD 


0,1 


4811 


LD 


H,(IX<3) 


! 'Bt 


LDI 




2541 


LO 


<IY*4),l 


3311 


LO 




4141 


LD 


E,(1Y*2) 


4824 


LD 


E,<1Y*I5) 


1 tH 


LDI 




2554 


LO 


<IY*7),H 


3311 


ADO 


A,(IY*2) 


4171 NESUDI 


NI 


HL.OE 


4831 


LD 


D,(IY414) 


1811 


LDI 




2561 


LO 


A,E 


3321 


RET 


NC 


4181 


DEC 


A 


4841 


ADO 


HL.OE 


lili 






2571 


LD 


C,A 


3331 


RET 


l 


4191 


JP 


N2 .NESUDI 


4851 


LD 


(1X«4>,1 


¡821 


LDI 




2581 


CP 


128 


3341 


LO 


(IX* 7), A 


4111 


LD 


<IX«2),L 


4861 


LD 


(IX«5),H 


im 






2591 


CCf 




3351 


LD 


A, 8 


4111 


LD 


(IX«3).H 


4871 


LD 


0,<IX*7) 


:&<» 


LDI 




2411 


SBC 


A,A 


3344 


NE6 


4121 


LD 


A,<IX<4) 


4881 


LD 


A,(IX«9) 


:?5§ 


LOI 




2411 


LD 


6, A 


3371 


LO 


(IX*8),A 


4131 


MI 


A.7 


4891 


AND 


4 


isa» 


LOI 




2421 


LD 


L,<1Y«4) 


3381 


ADO 


A,<IX«2) 


4144 


n 


A 


4911 


JR 


2.SANUBY 


:b?» 


LDI 




2431 


LD 


H,(1Y*5) 


3391 


LD 


(1X*2).A 


4151 


■ 


A 


4911 


INC 


0 


iba* 


LOI 




2441 


ADO 


HL ,8C 


3411 


LD 


A,l 


4161 


m 


A 


4924 SANOBt LO 


<IX*I4),D 


INI 


LOI 




2451 


LO 


(IY*4),L 


3411 


AOC 


A,(IX*3) 


4171 


LD 


(1XM31.A 


4931 


POP 


OE 


I9M 


LDI 




2441 


LO 


<1Y*5),H 


3421 


LO 


(1X*3),A 


4181 


JP 


COYPOS 


4941 


POP 


Kl 


lili 


LDI 




2471 


LO 


A,(IY*I2) 


3431 


LO 


A,C 


4191 YP0S1T LO 


A,(1Y*4) 


4951 


PUSH HL 


I9H 


LDI 




2481 


LO 


E,(IY»8) 


3441 


LD 


Kl .ORIGAT-l 


4211 


CP 


192 


4944 


LD 


(IXMD.L 


im 


LDI 




2491 


BIT 


3,0 


3451 


LD 


BC.ORIGSC 1 
6 


4211 


RFT 


NC 


4971 


LO 


(IX*12),H 


INI 


LOI 




2711 


JP 


N2 .AOETRA 


3441 


AND 


4221 


M 


A 


4981 


LD 


H.B 


1991 


LDI 




2711 


INC 


A 


3471 


JR 


NZ, PARTEY 


4231 


su, 


A 


4991 


LO 


t«c 


1941 


LDI 




2721 


CP 


E 


3481 


INC 


HL 


4241 


SRL 


A 


5111 


LO 


A,(1X*I4) 


1971 


LOI 




2731 


JR 


N7.N0FICI 


3491 


INC 


BC 


4251 


PUSH BC 


5111 


LO 


(PUBYSA* 1), A 


1981 


LOI 




2741 


XOR 


A 


3511 


JP 


PARTEY 


4268 


LO 


BC.33 


5124 


LO 


(PUATSA* 1 ) ,A 


1991 


LOI 




2751 NOf 1CI LO 


<1Y*12),A 


3511 XPOSIT LO 


A,C 


4271 


M 


A 


5131 


NEG 




.m 


LDI 




2741 


JP 


TRAREN 


3521 


SUB 


I 


4281 CALATT DEC 


A 


5141 


ADO 


A, 33 


mt 


LDI 




2771 MfflM M 


A 


3531 


JR 


C.INTE6E 


4291 


jp 


2.ATC0NP 


5151 


LO 


( PUSUSA» 1), A 


m% 


LDI 




2781 


LO 


D,A 


3541 


SRL 


A 


4311 


MI 


HL.BC 


5141 


LO 


(ATSUSA* 1), A 


un 


INC 


HL 


2791 


SUB 


E 


3551 


SSL 


A 


4311 


jp 


CALATT 


5171 


LO 


A,(NUBL80) 


2141 


DEC 


B 


2811 


SUB 


E 


3541 


SRL 


A 


4321 ATCJNF POP 


BC 


5181 


INC 


A 


mt 


JP 


N2.LVOLCA 


2811 


ADO 


A, 2 


3571 


AOO 


A,(IY«2> 


4331 


PUSH HL „ 


5191 


LO 


MMLHM 


2141 


RFT 




2821 


LD 


< PARETR» 1), A 


3581 


CP 


33 


4341 


PUSH 


DE 


5111 


LD 


A,(1X«4) 


:ri 






2831 


JR 


2.FIANCI 


3591 


JR 


C.INTEGE 


4351 


LD 


H.B 


5111 


LO 


1,1 








2841 


LD 


A,D 


3611 


SUB 


32 


4341 


LD 


L,C 


512» PUBYSA LD 


C,l 


UN MOVERR LO 


A,(IY*5> 


2851 


FIANC1 LD 


(IY«12),A 


3411 


LD 


(IX*8),A 


4371 


lD 


DE, 33 


5131 


LOIR 


2111 


CP 


127 


2841 


CP 


E 


3421 


NEG 




4381 


LO 


A,()Y*4> 


5141 PUSUSA LO 


c.» 


2111 


RFT 


2 


2871 


JR 


C , TRAREN 


3431 


AOO 


A,(IY*2> 


4391 


-y<; 


A 


5151 


AOO 


HL.BC 


2121 


LO 


A,(IY*9> 


2881 PARETR LO 


M 


3641 


LO 


(IX* 7) ,A 


4411 


JR 


2.PRIFU 


5144 


DEC 


A 


2131 


LO 


D,A 




NEG 




3451 RECOIN LO 


A,C 


4411 CALFIL AOO 


HL.DE 


5171 


JR 


N2, PUBYSA 


214» 


AND 


71 


29ÍI T HAREN LO 


E ( (IY«I8) 


3668 


SRL 


A 


4421 


DEC 


A 


5181 


POP 


HL 


2154 


LD 




2911 


LO 


D,(1Y*I4) 


3471 


SRL 


A 


4431 


JP 


N2.CALF1L 


5191 


LD 


A,(IX«I3) 


un 


BIT 


4,0 


2921 


SLA 


E 


3681 


SRL 


A 


4441 


LD 


B.H 


5211 PUATSA LO 


til 


2171 


JR 


7.RECLJN 


2931 


RL 


0 


3491 


LO 


C,A 


4451 


LD 


CL 


5211 


LOIR 


Z1M 


LD 


L,(IY*I3> 


2941 


LO 


L,(1Y*I) 


3711 


LO 


HL.0R16AT 


4461 PRIFIL LO 


A,(1Y*4> 


5221 ATSUSA LO 


M 


2191 


LD 


H,(IY*14) 


2954 


LD 


M,(IY«I> 


3711 


AOO 


A,L 


4471 


MI 


A,(1Y*3) 


5231 


ADO 


HL , BC 


2211 


RECUPE LD 


A,(HL) 


2941 


ANO 


A 


3721 


LD 


L.A 


4481 


■ 


C, HOSCAS 


5241 


DEC 


A 


2211 


CP 


127 


2971 


JR 


Z.PR1FAS 


3731 


AOC 


A,H 


4491 


CP 


193 


5254 


JP 


N2, PUATSA 


2221 


JR 


N2.N0FITA 


2981 


LD 


B,A 


3741 


SUB 


L 


4511 


JP. 


NC.NOSCAB 


5241 


LD 


C.15 


223» 


LO 


1,<1Y*II) 


2991 NÜLT1P ADO 


HL.DE 


3751 


LD 


H,A 


4511 


LD 


A,(IY*3) 


5271 


AOO 


IX.BC 


224» 


LO 


H,<IY*II> 


3111 


DJN2 


NULTIP 


3741 


LO 


A,C 


4521 


LD 


(1X«4),A 


5281 


REI 




:m 


LD 


A,(HL) 


3411 PR1FAS LD 


<JX*2),l 


3771 


LD 


BC.ORIGSC 


4531 


LD 


A.C 


5291 | 






2261 NOF I TA CP 


124 


3121 


LD 


(1X«3>,H 


3781 


AOO 


A,C 


4541 


EX 


AF.AF' 


5311 ; 






227» 


JR 


N2.TRAN0R 


3131 


RET 




3791 


LO 


C,A 


4551 


LO 


C,(IY*4) 


5311 OIBUJA LD 


IXJA8L0I 


228» 


INC 


HL 


3141 






3881 


AOC 


A,B 


4564 


M 


C 


5321 


LD 


A.(NUBLBO) 



5331 01BLUP DEC 


A 


Mj 






BM 


un 


Z 


ili! 




U A 

H,A 


VBH 


PUSH Af 






DE.HL 


- 3 c * 


LO 


E,(IX«I) 




f» 




MI 


LO 


0,(IX«1) 


MI 






ñu 


LO 


H,(1X«9) 


618» 


* 






LO 


L.255 


¿111 






54tt 


LO 


A,<HL> 


412! 


in 




5418 


LO 


(PflNUWn.A ¿131 


i» 


AUXM4) 


542» 


INC 


H 


6¡48 


in 




5438 


LD 


A,(HL) 


¿158 


NFR 




5448 


DEC 


H 


¿1¿» 


AOD 


A 33 


5451 


LD 


<POSNU1<!),A «171 


LD 


< C 1 HAT7 t i \ A 

(SURI 1*1 ) ,A 


5448 


EXX 




I1M 


LO 


E, (1X4(1) 


54 ?» 


LD 


L,(IX*2) 


im 


LD 


0,184 


l 498 


LO 


H,<1X«3> 




LO 


A,(1X+I3) 


MU 


PUSH HL 


¿211 ATLAFX EX 


AF.Af' 


- -i# 


POP 


1Y 


¿221 AT0IR6 LD 


8,1 


5511 


LD 


L,(1X*4) 


¿231 ATBLDI LO 




5528 


LD 


H,(IX»5) 


4241 


ANO 


o' 


BM 


LD 


A,(1X*7) 


MI 


N 


E 


5541 


LD 


<P0S8YTO),A ¿2¿8 


LO 


(HL),A 


5558 


NE6 




MI 


INC 


I 


811 


ADO 


A.33 


42:-» 


DJN2 ATBLDI 


un 


LO 


<SIWUAL«1),A 


¿291 SUMAT7 LD 


M 


BM 


LD 


C,(IX4¿) 


6311 


AOO 


HL.BC 


<;5>8 


LD 


E,(1X«8) 


¿311 


EX 


Af.Af' 


5¿88 


LD 


0,1 


MI 


DEC 


A 


5*11 


LOSO* EXX 




¿331 


JP 


NZ , ATLAFX 


MU POSNW LO 


BC.8 


¿341 


POP 


AF 


IM 


EXX 




4358 


LD 


C.IS 


5441 P0S8YT LO 


M 


MI 


AOD 


IX.BC 


5¿5I LOBYTS LO 


A,(1Y«8) 


MI 


JP 


DIBLUP 


5cí8 


INC 


IY 


MI 






un 


EX 


Af,Af' 


43V» 






IM 


LO 


A,(HL) 


4488 


ESTADO DEFB 1 


UN 


INC 


Hl 


¿411 NU6LB0 DEFB 1 


5711 


EXX 




4428 






mi 


LD 


L,A 


4438 






5:21 


LD 


A,(HL) 


4441 


DINEXS LD 


E,(1Y«2> 


57* 


N 


c 


4458 


SLA 


E 


5741 


INC 


N 


44 M 


SLA 


E 


mi 


LD 


C,(HL) 


¿4^8 


SLA 


E 


S7M 


EX 


AF.AF' 


MI 


JP 


C0NT1N 


5'7I 


LD 


L,A 


¿491 OINEYS LD 


E,(IY*3> 


I7M 


LD 


A,B 


¿511 COKTIN LD 


0,1 


sm 


LD 


8,<HL) 


¿518 


AND 


A 


m 


DEC 


H 


4528 


SBC 


HL.DÉ ^ _ 


MI 


■ 


(Hl) 






5628 
MI 


LD 
EX 


L,A 
Af AF' 









RET 

COOROS CALL 
CALPOI JP 
COORDX LD 
LA 
RET 

COOROY LD 
LD 
RET 

OITABS LD 
AND 
RET 
PUSH 
LD 

SUMOIS AOO 
DEC 
JR 
POP 
RET 



DITABS 
I 

L,(IY«4) 
H,(1Y«5) 

L,(1Y«¿) 
H,(IY«7) 



2 

OE 

DE, 17 
IY.DE 
A 

N2,SUNDIS 
DE 



NLMSPR EOU 23¿81 

TA8LDI EQU 53289 

TASPRI EBU 53111 

ORI6SC EQU 54568 

ORIGAT EOU ¿4984 

SPARES EOU 53544 

SPRICHEOU 23728 



0R6 
INICIO OI 
LD 
LD 
LD 
LD 

INTCRE LD 
INC 
DJN2 
LD 
LD 
LD 
LD 

INILAP EX 
PUSH 



¿1953 

A, 241 

M 

B. l 

HL,¿1¿9¿ 
(HL) ,242 
HL 

INTCRE 
(HD.242 
DE.0RI6SC 
HL,1¿384 
A.192 
AF.AF' 
HL 

BC.32 



7811 POP 


HL 


7498 


u 


A,l 


7821 INC 


H 


7588 


LD 


(NUBL80),A 


7838 LD 


A,H 


7518 


<2* 


A 


7848 ANO 


7 


7528 


LD 


(NLMSPR) ,A 


7851 JR 


N2, INIPRT 


7538 


LD 


(ESTADO), A 


78¿8 LD 


A,L 


7548 


E! 




7878 AOO 


A, 32 


7558 


m 




7181 LD 


L|A 


75¿8 ; 






7898 JR 


C, INIPRT 


7578 ¡ 






7118 LO 


A,H 


7588 DESACT 


i» 


A, 63 


7118 SUB 


8 


7598 


1 


1 


7128 LO 




7¿88 


LD 


),A 


7138 INIPRT EX 


AF ,AF' 


7¿18 


El 




7141 DEC 




7¿28 ; 






7158 JR 


NT. , INILAP 


7¿38 ; 






7I¿8 LO 


HL 22528 


'=48 EMM .: 


8C,(SPRICH) 


7178 LD 


DE 0R16AT 


7¿58 


M 


C 


7188 LD 


A, 24 


7¿¿8 


M 


Z.BCtNTO 


7198 INATLA LD 


BC 32 


7¿78 


ÜÍC 


C 


7218 LD1I 




7¿88 


EMU CHOSoe 


7218 INC 


DE 


7¿98 


LD 


BC,8 


7221 DEC 




7788 


El 


NC 


7238 JR 


NZ, INATLA 


7718 


INC 


BC 


7248 IM 


2 


7728 


El 




7258 LD 


C 4 


7738 ; 






72¿8 LO 


H.248 


7741 BCONTO LD 


1X.SPR1CH 


7278 LCRTCR LO 


A, 9 


7758 


LD 


A,(NUNSPR) 


7288 SUB 




7768 BUCHAL INC 


(IX«8) 


7298 SUB 




7778 


Ex 




7388 LO 


L | 


7788 


u 


BC.(SPRICH) 


7318 ROTACU LO 


| 1 


7798 


LD 


A.8 


7328 LO 


E,8 


7888 


CP 


C 


7338 LO 


D.A 


7818 


JR 


2, SASPRI 


7348 VERROT DEC 


0 


7828 


MU MM 


7358 JR 


2, VEREXI 


7831 


UJ 


BC.l 


73¿8 SRL 


B 


7841 


per 


C 


7378 RR 


E 


7858 SASPRI EX 


Af ,AF' 


7M JR 


VERROT 


78¿8 


El 


A 


7398 VEREXI LD 


(HL).B 


7878 


JR 


N2, BUCHAL 


7488 MC 




7888 


DEC 


BC 


7418 LD 


(HL),E 


7898 


El 





7428 
7438 
7448 
7458 
7448 
7478 
7488 




7918 CHOSUB LD 


HL.COOROX 


7928 


LD 


(CALPOM).HL 


7938 


LD 


HL, DINEXS 


7948 


LO 


<ANCALT»1),HL 


7958 


CALL 


CHOREA 


79¿8 


RET 


NC 


7978 


LD 


HL, COOROY 


7988 


LD 


(CALPOI *I),NL 


7998 


LO 


HL.DINEYS 


8888 


LO 


(ANCALT«1),HL 


8811 CHOREA LD 


A, 8 


8828 


CALL COOROS 


8838 


EX 


DE.HL 


8841 


LD 


A,C 


8858 


CALL COORDS 


8868 


AND 


A 


8878 


SBC 


HL.DE 


8888 


LO 


A,B 


8898 


JR 


NC.BIENCO 


8188 


LO 


A,H 


8118 


en 




8121 


LO 


M 


8138 


LO 


A,L 


8148 


CPL 




8158 


LD 


L.A 


8161 


INC 


HL 


8178 


LD 


M 



8188 BIENCO CALL OITABS 
8198 ANCALT JP 8 



6 GRANDES EXITOS EN UNO 

MAS UN JUEGO GRATIS(DUET) CfE 




32¡^5FECini_ 

David LÓPEZ GUAITA 



MOVIMIENTO 



Con esta rutina no 
sólo podrás definir 
las teclas y mover un 
sprite principal por la 
pantalla, sino 
trasladar gráficos 
secundarios al 
mismo tiempo, borrar 
zonas de la 
pantalla e incluso 
colorear zonas de 
atributos. 




ction es una ru- 
tina formada 
por tres partes 
MmW^ diferenciadas: 

JT M una rutina de 
definición de teclas o elec- 
ción de joystick, un progra- 
ma que se encarga de che- 
quear el teclado, actualizar 
la posición de un objeto en 
pantalla y escribir los nue- 
vos datos en un buffer y la 
rutina por interrupciones 
que imprime en pantalla to- 
dos los gráficos que haya en 
el buffer, vaciándolo. 

Con esta rutina sacarás el 
máximo rendimiento si la 
usas desde Código Máqui- 
na con esta rutina. 



FUNCIONAMIENTO 



Para describir el funciona- 
miento, vamos a hacerlo di- 
vidiendo el programa en sus 
tres partes: 

Definición de teclas. 
Con esta rutina comienza 
el programa. A grandes 
rasgos, el programa pre- 
gunta en principio si se quie- 
re usar con joystick Kemp- 
ston o redefinir las teclas. Si 
se redefinen las teclas, el or- 
denador chequeará una a 
una todas las semifilas del 
teclado. Si hay alguna tecla 
pulsada, el ordenador al- 
macenará sus datos en la 
memoria, y pasará a la si- 
guiente dirección para defi- 
nir otra tecla, hasta acabar. 

El inicio 
está en la 



dirección 63450; en las li- 
neas 70-80 el ordenador 
abre el canal dos de la pan- 
talla, llamando a una rutina 
de la ROM. Después, se 
carga en DE la dirección de 
un texto a imprimir, en BC lo 
duración del texto y se llama 
a la subrutina de la ROM 
PR-STRING, que se encargo 
de imprimir todo el texto. 

Así, con el primer menú 
ya en pantalla, el ordena- 
dor leerá la primera semifi- 
la del teclado paro ver si se 
ha pulsado alguna tecla. 
Como probablemente yo 
sabrás, el teclado se divide 
en ocho semifilas (fia . 1 ) . 

Para leer una semifila hay 
que describir en el acumu- 
lador el dato de esa semifi- 
la, (los números 




MOVIMIENTO 



Y TECLADO O O 




para después hacer 
IN A, (FE). Con esto 
remos en la mitad superior 
del registro de direcciones el 
valor del registro A, y en la 
mitad inferior el valor FEh. 
Al ejecutarlo, se nos devuel- 
ve en el registro A un valor 
con las teclas pulsadas en la 
semifila. 

Si no hay ninguna tecla 
pulsada, el valor es 
XXX 11 11 1 . Si hubiera algu- 
na tecla pulsada, el valor de 
uno de los cinco primeros 
bits se pondría a 0 . De esta 
forma, el primer bit se pon- 
dría a cero si pulsáramos la 
tecla de la semifila más ale- 
jada del centro del teclado, 
el segundo bit si pulsáramos 
la siguiente tecla, etc. 

En la rutina, el ordenador 
chequea la semifila 1 -5, y si 
hay una tecla pulsada, (1 ó 
2), sus bits se pondrán a 0, 
y el ordenador saltará a las 



distintas partes del progra- 
ma. 

Si se ha pulsado la tecla 1 
para jugar con el joystick 
Kempston, el ordenador irá 
a KEMPS, en el cual simple- 
mente cambiará una direc- 
ción de salto de la rutina de 
control del sprite para que 
en vez de chequear el tecla- 
do teclee el joystick, y des- 
pués volverá al Basic. Si se 
pulsa la tecla 2 
se procede a 
observar todo 
el teclado con 



.- rutina DEFIN. Lo 
primero que se hace es 
imprimir otro texto, (líneas 
250-270). Se coloca en la 
dirección de salto de lo ru- 
tina número 2 el valor de te 
ciado, por si hubiera sido 
cambiado por error, y se 
carga en HL el valor de una 
dirección de tabla. Entre la 
línea 330 y 380 se borran 
los ocho bytes de la tabla. 
En esta tabla iremos escri- 
biendo los datos de cada te- 
cla seleccionada: byte de 
mayor peso del bus de di- 
recciones y valor de la semi- 
fila si le tecla está pulsada. 

Después de limpiar la tabla 
se salta a ESPERA, rutina 
entre las líneas 1 370 y 1 420 
que se encarga de detener 
la ejecución hasta que no 
hayo ninguno tecla pulsada. 





El registro L con- 
tiene el número de 
la tecla que esta- 
mos redefinien- 
do. Desde la 
línea 410 has- 
^ ta la 690 se po- 
nen los atributos de 
una determinada opción 
de la pantalla en FLASH 1, 
y los de la opción anterior 
en FLASH 0 . Esto lo hace en 
función del registro L, que 
tiene el número de opción 
que se está preguntando. 

A partir de la línea 700 
empieza la rutina de defini- 
ción propiamente dicha. Se 
carga en A el valor 
01111111b. Esto se hace 
por la siguiente razón; si ob- 
servas el valor que hay que 
darle al registro A, a prime- 
ra vista no parece haber 
ninguna relación entre ellos. 
Pero el poner esos valores 
en binario, observa el resul- 
tado: 
7Fh = 01111111b 
BFh = 10 1 1 1 1 1 Ib 
DFh=11011111b 
EFh = 1 1 10 1 1 1 Ib 
F7h=11110111b 
FBh=11111011b 
FDh = 1 1 1 1 1 1 0 1 b 
FEh» 1 1111 110b 
Como pueden observar, 
para chequear el teclado se 
puede cargar en A el valor 
de la semifila, y haciendo 
ocho rotaciones podemos 
leer todas las semifilas del 
teclado. 

Esto es precisamente lo 
que ocurre <-ntre las lineas 
700 y 790. El programa va 
rotando A, y comparando 
los valores lo semifila se- 
Ifxxinnodo con 0 0 0 1 1 1 1 1 h; 
si alguna tecla está pulsada, 
se salta a INTEC. 
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En INTEC cargamos en E 
el valor de la semifila que 
tiene alguna tecla pulsada, 
y entre las líneas siguientes 
cargamos en D el valor que 
se ha devuelto en el registro 
A con las teclas pulsadas. 

Desde la línea 870 hasta 
la 970, se observa si en 
semifila hay dos teclas pul- 
sadas al mismo tiempo, y si 
es así, se vuelve hacia el ini- 
cio de la redefinición. 

En ONMASC se compa- 
ran todos los datos de teclas 
ya seleccionadas con los da- 
tos de la actual, y si se han 
seleccionado dos teclas 
iguales de nuevo se vuelve 
al incio de la rutina de defi- 
nición, en CHECK. Si se han 
comprobado todas las ante- 
riores teclas y ninguna es 
igual a la anterior se salta a 
TODOS. Allí se calcula la di- 
rección en la tabla donde 
pondremos los datos de la 
tecla que ha sido pulsada. 

Al hacer esto, se llama a 
SONY, subrutina que pro- 
duce un ruido. Observa en 
la rutina SONY (líneas 
1430-1520) como para 
preservar el color del borde 
lo tomamos de la variable 
BORDCR (23624), antes de 
hacer el sonido. 

Una vez hecho todo esto, 
volvemos a la rutina princi- 
pal. Cargamos de nuevo L 
con el valor de la opción 
que estamos preguntando, 
y si esta es ya 4, es decir, se 
han seleccionado ya las 
cuatro teclas, volvemos al 
Basic. 

Si aún no son cuatro las 
teclas seleccionadas, volve- 
mos a PREG hasta acabar. 



VALORES 
DE LAS DIRECCIONE 
DEL MOVIMIENTO 

g. 2 



ACTUALIZACION DE 
POSICIÓN DESPUÉS DE 
CHEQUEAR EL TECLADO 

Empieza con ZCONTR, 
donde verás dos «DEFB». 
Con ellos se hoce en reali- 
dad un salto a la dirección 
que en principio es KEYBO. 
Esta dirección de salto es 
precisamente lo que cam- 
biábamos al seleccionar la 
opción de ¡oysticlc Kemp- 
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contiene las direcciones de 
inicio de los gráficos del per- 
sonaje principal según cual 
sea su dirección. Es decir, 
que para cada dirección el 
ordenador buscará en esta 
tabla para encontrar el ¡n- 
cio del gráfico que corres- 
ponde a esa dirección del 
objeto. Como esto parece 
algo lioso, vamos a poner 
un ejemplo. Observa la fi- 
gura 2. 

En la figura están repre- 
sentadas Tas sumas que se 
obtienen para cada movi- 
miento del personaje del 
contenido de las variables 
HORIZ y VERTI. Suponga- 
mos que el gráfico se mue- 
ve en diagonal hacia abajo 
y hacia la izquierda. Enton- 
ces, la suma de VERTI y HO- 
RIZ sería 12. El ordenador 
multiplica por dos este do- 
to, y lo suma a GRAFIC. La 
posición de memoria resul- 
tante es el inicio del gráfico 
en el cual se representa por 
ejemplo a nuestro héroe ca- 
minando hacia abajo y ha- 
cia la izquierda. 

Después de haberte expli- 
cado la utilidad de cada va- 
riable, proseguiré con la ex- 
plicación del programa. 

Según esté SWITC Ha 1 o 
a otro valor, el ordenador 
imprimirá el gráfico con la 
subrutina IMPRESS o con la 
subrutina FASTER. Te pre- 
guntarás el proqué de ha- 
ber puesto dos subrutinas 
que realizan lo mismo. La 
respuesta estriba en su pro- 
pio funcionamiento. Cuan- 
do imprimimos un gráfico 
en la posición 4 por ejemplo 
en horizontal, tenemos que 
rotar hacia la derecha cua- 
tro veces cada uno de los 
bytes del gráfico. Esto hace 
que la impresión sea muy 
lenta, especialmente cuan- 
do hay que imprimir varios 
gráficos y éstos son muy 
grandes. La solución a este 
problema se encuentra en 
FASTER. Esta rutina trabaja 
con los gráficos ya rotados. 
Supon que quieres imprimir 



con FASTER un gráfico que 
está situado también en la 
posición 4 del eje X. Enton- 
ces, el programa buscará 
en su memoria dónde em- 
pieza el gráfico que ya está 
rotado cuatro veces, y lo im- 
primirá en la pantalla. El 
defecto de FASTER es que 
ocupa mucha más memo- 
ria, ya que hay que introdu- 
cir un gráfico por cada po- 
sible posición. No obstante, 
hay algunos casos en los 
que el número de gráficos 
puede ser de cuatro, de dos 
o de uno. Si movemos el 
gráfico de dos en dos pixels, 
sólo necesitaremos cuatro 
gráficos, ya que si el orde- 
nador al empezar a mover 
el sprite comienza en el pi- 
xel de coordenada X igual 
a 0, las posibles posiciones 
para X serían 0, 2, 4, 6. Si 
X fuera 8, bastando con in- 
crementar el número de co- 
lumna para la impresión. 

Por otro lado, IMPRES im- 
prime en OVER 1 y FASTER 
simplemente imprime enci- 
ma de lo anterior. 

En la figura 2 verás los 
dos gráficos necesarios pa- 
ra un movimiento que se 
desplace de cuatro en cua- 
tro pixels. 

Otra ventaja que tiene 
imprimir con FASTER es que 
con IMPRES hay que impri- 
mir primero el gráfico en la 
anterior posición para bo- 
rrarlo y después imprimir el 
nuevo gráfico. Con FASTER 
podemos hacerlo impri- 
miendo un sólo gráfico. El 
truco consiste en hacer que 
en el dibujo del sprite hay 
un marco que tenga de an- 
cho el número de pixels del 
pasod el movimiento. Asi, 
un sprite se mueve de dos 
en dos pixels, necesitará un 
marco alrededor de toda la 
figura con un ancho de dos 
pixels. Entonces, con impri- 
mir una vez el gráfico, que- 
darían borrados los restos 
del anterior. 

Una vez hechas todas es- 
tas aclaraciones, voy a se- 



guir explicando la rutina de 
lectura del teclado y actua- 
lización de las variables de 
posición. 

Lo primero que se hace 
una vez que estamos en 
KEYBO es deshabilitar las 
interrupciones para tener 
mayor velocidad y que no 
se imprima ningún gráfico 
mientras formamos sus da- 
tos. El programa carga en 
BC el alto y el ancho del 
sprite; pone las variables 
HORIZ y VERTI A 0 y car- 
ga en IX el valor de NUE- 
POS. Después carga DE con 
el valor deNUEPOSylo co- 
pia en ANPOS. 

Para chequear el teclado, 
se carga en HL el inicio de 
la tabla que contine los da- 
tos de todas las teclas, y se 
van comprobando si esas 
teclas son pulsadas ahora. 
Para ello primero se carga 
en el acumulador el byte de 
mayor peso del bus de di- 
recciones, luego con el va- 
lor devuelto por el teclado 
se hace un complemento y 
se hace un OR con el valor 
de la tecla predefinida. Si el 
resultado es de 255, quiere 
decir que la tecla ha sido 
pulsada. Entonces llama a 
la subrutina de dirección co- 
rrespondiente; en ello ob- 
serva si la nueva posición 
haría que parte del sprite 
saliera fuera de la pantalla 
y si es así vuelve a la rutina 
principal. En caso negativo, 
cambia NUEPOS con la 
nueva posición y pone HO- 
RIZ o VERTI como corres- 
ponda. Después volverá al 
programa. 

Todo esto se repite hasta 
que ya hemos observado 
todas las teclas. Con la ruti- 
na de joystick Kempston los 
pasos son muy similares, pe- 
ro no hace falta mirar en las 
teclas de la tabla, basta con 
tomar el dato del port 233. 

Después KEYBO y JOYST 
confluyen en CAMBIA. Esta 
parte se ocupa ya de poner 
los datos en el buffer para 
que luego se impriman por 



interrupciones. La línea 
2290 decide si se debe uti- 
liar IMPRES, y si es así salta 
a LNTIMP. Si no se ha sal- 
tado, se utilizará FASTER; 
en ese caso se copia en AN- 
POS NUEPOS y se carga en 
DE. A continuación, toman- 
do el valor de buffer se lla- 
ma a PUTTER. 

Buffer es una variable de 
un byte situada en la direc- 
ción 62000. Contiene el nú- 
mero de sprites que se de- 
ben imprimir. Inmediata- 
mente después de la direc- 
ción 62000 se colocan los i 
datos de todos los sprites 
que se deseen imprimir. 

PUTTER es una rutina que 
comienza en la línea 3990; 
sirve para calcular en qué 
lugar del buffer se deben in- 
troducir los siguientes datos. 

Para ello toma el valor 
del acumulador y lo multipli- 
ca por 7 llamando a MUL- 
Tl, rutina que hace una mul- 
tiplicación entre dos núme- 
ros de 16 bits y deja el re- 
sultado en HL. HL toma así 
la dirección donde se deben 
guardar los gráficos y se lla- 
ma a la rutina principal. En 
ella IX toma el valor de HL, 
y pokea con el valor 2. 

Es hora de que te expli- 
que cómo se colocan los da- 
tos para que el impresor por 
interrupciones haga una co- 
sa u otra. 

En primer lugar se carga 
en el acumulador buffer y se 
multiplica por 7 para hallar 
la dirección donde debemos 
introducir los datos. La ruti- 
na de impresión tiene cua- 
tro funciones: imprimir con 
IMPRES, imprimir con FAS- 
TER, borrar una zona de la 
pantalla y cambiar los atri- 
butos de una zona de la 
pantalla. 

Seleccionamos la opción 
que queremos con un núme- 
ro al principio de cada blo- 
que de 7 datos: 

1=IMPRESS 

2 = FASTER 

3 = BORRA 

4 = PAINT 



Este número irá con un 
prefijo delante de otros 6 
datos. Estos datos serán, 
dependiendo de la función 
que hayamos escogido: 

1 IMPRESS 

Dirección del prefijo uno 
en la memoria: 6200 1 (por 
ejemplo) 

62001.. .1 

62001 + 1 Dirección del 
gráfico que queremos impri- 
mir. 

62001+3 Dimensiones 
del gráfico que vamos a im- 
primir; primero se almacena 
el ancho del sprite en carac- 
teres y después el alto del 
sprite en scanes. 

62001 +5 Posición del 
gráfico en la pantalla. Se 
pokea primero la posición 
en la coordenada X en pi- 
xels y después la de la coor- 
denada Y en pixels. Recuer- 
da que el origen del sistema 
de coordenadas está situa- 
do en la esquina superior iz- 
quierda. 

2 FASTER 
62001. ..2 

Los datos son básicamen- 
te idénticos. Las únicas dife- 
rencias es que la dirección 
de los datos de 62001 + 3 
no apuntará directamente 
al gráfico, sino a uno tabla. 
En esta tabla deberán estar 
las direcciones de inicio de 
cada gráfico desplazando, 
según el número de pixels 
que se haya separado la 
posición X de la columna si- 
tuada a su izquierda. Por 
ejemplo: 

X = 27. Excede en tres pi- 
xels de la columna de su iz- 
quierda (8x3 = 24). 

TABLA 

Exceso 

de pixel Dirección 

1 60000 

2 60100 

3 60200 

4 60300, etc 

La tabla podrías ubicarla 
en la dirección 50000, por 
ejemplo, y ese es el dato 
que debes de introducir en 
dirección. Esta tabla estaría 
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;a datos control 

3E02coeii6ei3seeiiE4 591 

F8CD3C203EF7DBFECB4 7 1601 

CRF9F7CB4FCR03F8C3E8 1860 

F72131F21122FB732372 1137 

C901S0001 119F9CD3C20 670 

2131F2116CF973237221 995 

EBFF0608RF772310FC2E 1147 

00CDC7F8E57OC6092105 12S1 

S84F06003E20093DC230 S79 

F806OR7EE67F772310F9 1166 

3E1685D245F8246FO60R 907 

7EF680772310F9E13E7F 1333 

5F7B0F5FDBFEE6 1FFE 1F 1347 

C262F8C353F8577B0BFE 1749 

E61FFE1FCR24F857OE02 1135 

0604CB67CR7EF8CB271O 1150 

F7C386F80DCR50F8CB27 1609 

10EC06004D21EBFF78FE 1232 

04CRRCF87BBECR9DF823 1581 

2304C38CF87R23BEC2R7 1330 

F869C350F80423C38CF8 1498 

21EBFF79CB278502B7F8 1660 

246F732372CDD1F8692C 1222 

7DFE04C224F8C9RFDBFE 1710 

2FE61FC2C7F8C9O6073R 1221 

•18SCCB3FCB3FCB3FD3FE 1427 

EE107610F9C9160R0510 891 

0213011100312E204R4F 319 

5953S449434B204B454D 724 

5053544F4E160C051006 465 

322E20444546494E4520 587 

434F4E54524F4C455316 719 

0R051007444552454348 465 

4 1202020202020202020 3S3 

20202020 160B05 100649 261 

5R51SS494S52444 12016 667 

0C05100541424 14R4F20 419 

20202020202020202020 320 

20202020 160D0S 100241 251 

525249424 120202020C3 691 

6CF9F3DD2 1E2FFDD4E00 1634 

DD4601DD360200DD3603 847 

O0DD21DFFFDD6E00DD66 1386 

01E5DDE121DDFF5E2356 1400 

2373237221EBFF7EDBFE 1421 

23E6 1F2FB6FEFFC2R9F9 1646 

CD7EFR237EDBFEE6 1F2F 1523 

23B6FEFFC2BRF9CD99FR 1963 

2 37EDBFEE6 1F2F23B6FE 1413 

FFC2CEF9CDRRFRC3DFF9 2196 

23 7EDBFEE6 1F2F23B6FE 1413 

FFC2DFF9CDBFFR3RDCFF 2100 

FE01CR22FR21DFFF2356 1373 

2B5E2B722B733R30F2CD 1005 

0FFBE5DDE1DD36O002CD 1423 

E8FRDD7501DD7402DD71 1494 

03DD7004DD7305DD7206 1022 

2130F2343RE 1FFR7C277 1393 

FBFBED4O3R30F23CCD0F 1444 

FBESDDE5D 1DDE 1DD36F9 2109 

0121E6FF7E23666FDD75 1231 

©1DD7402DD71FCOD70FD 1512 

DD360001DD7103DD7004 950 

DD7305DD7206CDE8FRDD 1590 

75FRDD74FB21E0FF562B 1596 

5E2B722B73DD73FEDD72 1334 

FF2130F234343RE1FFR7 1387 

C277FBFBED4D79CB27CB 1695 

27CB27C60283D8E521DF 1313 

FF7BC6025F7321E4FF36 1358 

02E1C97BD6O2D8E521DF 1468 

FF5F7321E4FF3608E1C9 1469 

3E028082FECODOES21E0 1462 

FF90577221E5FF3604E1 1400 

C97RD602O8E55721E0FF 1583 

7221E5FF3601E1C921O0 1145 

003E10CB432801093FCB 664 

3RCB1BC621CB103DC2D5 1211 

FRC921E4FF7E2386CB27 1504 



DUMP: 40.000 
N.° BYTES: 1.572 



F521E8FF7E23666FF185 1513 

D2FEFR246FD55E235662 1387 

6B11E6FF7D127C131201 1122 

C9D5C506004F16001E07 755 

COO0FR1131F219C1D1C9 1599 

F3DD21E2FFDD4E00DD46 1568 

01DD360200DD360300DD 777 

2 1DFFFDD6E00DD660 IES 1395 

DDE121DDFF5E23562373 132© 

2372DBDFCB47CR56FBCD 1609 

7EFRDBDFCB4FCR60FBCD 1854 

99FR0BDFCB57CR6RFBCD 1899 

RRFRD8DFCB5FCRDFF9CD 2039 

BFFRC3DFF9DD 360704 DD 1615 

7108DD7O09DD730RDD72 1144 

0BDD770C2130F234C37B 1056 

FRDD21FDFD003600C321 1513 

B4FBDD7501DD74022100 1142 

FE01FD00712310FC713E 1099 

FEED47ED5EC9F5C5DSDD 1970 

E5E50E0ODD2131F23R30 1123 

F2B9CR4FFCDD7E00FE02 1563 

CRFFFBFE0 1CR 1DFCFE03 1703 

CR3BFCC5DD4E0 1DD4602 1303 

DD5E03DD5604DD7E05CD 1186 

ERFCC 1DDE5E 1 3E0785D2 1766 

F7FB246FE5DDE 10CC3C0 1719 

FBDDE5C5DD6E01DD6602 1555 

DD4 E03DD4 604DD5E0SDD 1 1 38 

5606CD5DFCC1DDE1C3ED 1713 

FBDDE5C5DD4E0 1DD4602 1491 

DD5E03DD5604DD6E05DD 1186 

6606CD5RF0C1D0E1C3ED 1727 

FBC5DD4E0 1DD4 602DD5E 1356 

03DO5604CDR7FCC1C3ED 1563 

FBRF3230F2FFE 1DDE ID 1 1901 

C 1F 1FBED4D7BE607CB27 1601 

850267FC246FD55E2356 1273 

D5E ID 1 7BCB3BCB3BCB3B 1556 

E6e7R7CR7DFC0CCD3DFD 1514 

C50600D5EDB0D1C17RE6 1583 

07rE07CR94FC14C3R4FC 1501 

7BC620DRR2FC5F7RD607 1423 

57C3R4FC5F14 10DRC97B 1371 

CB3BCB3BCB3BR7CRB3FC 1586 

0CCD3DFDC5RFD5 12 1C0D 1175 

C2B9FCD1C17RE607FE07 1653 

CRCDFC 14C3DDFC7BC620 1700 

DRDBFC5F7RD60757C3DD 1630 

FC5F1410D7C9D5E5D1CD 1655 

3DFDD5E ID 1C9F5CB38CB 1869 

38CB387BE607R7CRF9FC 1545 

0C7RE6O7R7CR01FD04CB 1201 

3RCB3RCB3RCB3BCB3BCB 1307 

3BD5E 1CD2RFDF 16 14CD5 1624 

12130DC216FDD16F7BC6 1160 

20D225FD145F7D10EBC9 1224 

7CCB2FCB2FCB2FC6585 7 1247 

7CE6070F0F0F855FC97R 957 

CB27CB27E6E0B35F7RE6 1564 

C0CB3FCB3FCB3FF57RE6 1587 

0757F1B2CBF757C9C5DD 1669 

E17DE60747R7CRB3FDCB 1662 

3DCB3DCB3DCDE0FCD5 16 1505 

000E00DD7E00C5CB3FCB 1027 

1910FR82RE772C5148C1 1104 

DD231DC273FD7RRE77D1 1471 

1SC87CE607FE07CR9FFD 1457 

7D936F24C36EFD7D93C6 1447 

20DRREFD6F7CD60767C3 1431 

6EFD6F24C36EFDCB3DCB 1535 

3DCB3DCDE0FCDDESD5C 1 1862 

D179C547F51RRE77132C 1225 

10F9F147052BF57CE607 1231 

FE07CRE0FD7D9O6F24C3 1551 

F 1FD7D90C620DREFFD6F 1814 

7CD60767C3F1FD6F24F1 1525 

C110CDC93E3FED47ED56 1371 

C9000000000000000000 201 



después formada por todas 
las direcciones (60000, 
60100. 60200. etc.). 

La segunda y única dife- 
rencia más es que el ancho 
que introduzcas debe ser 
siempre el del gráfico sin 
desplazar, a pesar de que 
desplazado ocupe más ca- 
racteres. 

3 BORRA 
62001. ..3 

62001 + 1 Dimensiones 
de la zona que vamos a bo- 
rrar. Primero introducimos 
el ancho en caracteres y 
después el alto en scanes. 
Hay que decir que la rutina 
borra por bytes y no por 
bits. Es decir, si hay un byte 
del que la rutina sólo debe- 
ría borrar un bit, la rutina 
borrará todo el byte, po- 
niéndolo a 0. 

6200 1 + 3 Posición en 
pantalla de la esquina supe- 
rior izquierda de la zona a 
borrar. Se introduce la 
coordenada X y después la 
Y; las dos deben estar en al- 
ta resolución, por pixels. 

62001+5 Indiferentes. 

4 PAINT 
62001. ..4 

62001 + 1 Dimensiones. 
Son iguales que en la rutina 
borra. 

62001 +3 Posición. Tam 
bién iguales. 

62001 I 5 Atributo con el 
que se va a llenar la zona. 

El último byte es indiferen- 
te. 

Ahora que yo sabes todo 
esto, comprenderás des- 
pués el porqué pone esos 
datos. 

Volvamos donde lo deja- 
mos: el registro IX tiene la 
dirección donde se deben 
cargar los datos. 

En la línea 2460, se llama 
aTABLER. TABLER suma las 
variables HORIZ y VERTI 
con el resultado va a una ta- 
bla de direcciones de movi- 
miento. Toma el valor de la 
tabla en el lugar de la suma 
multiplicada por dos, y lo 
guarda en ANTDIR. Enton- 
ces, vuelve a la rutina. 



38^E5PECinL_ 
LISTADO ENSAMBLADOR ACTION 



41 


QfiB 


43451 


711 CHECK 


LD 


A,'/.81llllll 


1348 


CP 


4 


1958 


CP 255 


2598 


RETI 


78 


LO 


ká 


718 


LD 


M 


1358 


JP 


NZ.PRE6 


1948 


JP NZ.CONTI 


2488 LNT1NP LO 


A,(8UFFER) 


81 


CALI 5433 


721 CHECK1 


LD 


A,E 


1341 


PE T 




1971 


CALL DEREC 


2418 


INC 


A 


9t 


LO 


BC.53 


738 


non 




1371 ESPERA XOR 


A 


1988 CONT1 


INC HL 


2428 


CALI PUTTER 


111 


LO 


DE.TEXT 


748 


LD 


E,A 


1381 


IN 


A, (254) 


1998 


LO A,(HL) 


2438 


PUSH HL 


111 


CALL I2I3C 


758 


IN 


A,(8FE) 


1398 


ni 




2811 


IN A.(IFE) 


2448 


PUSH IX 


121 AUNNO 


ID 


A.IF7 


748 


IN 


'/888I1III 


1488 


WD 


B1F 


2818 


AND 31 


2458 


w 


OE 


131 


IN 


A,<IFE) 


778 


CP 


'/.Mil 1 111 


1418 


JP 


NZ, ESPERA 


2828 


CPL 


2448 


POP 


IX 


141 


81' 


M 


788 


JP 


NZ.1NTEC 


1428 


RE' 




2838 


INC HL 


2478 


LD 


(IX-7),I 


158 


JP 


Z.KEMPS 


798 


Jp 


CHECK1 


1438 SONY 


LO 


B,7 


2848 


OR (HL) 


7488 


LI 


HL.ANTOIR 


lél 


er 


I.A 


888 1NTEC 


LD 


0,A 


1448 


LD 


A, (23424) 


2851 


CP 255 


2498 


LD 


A,(HLr 


171 


jp 


Z.DEFIN 


818 


LD 


A.E 


1458 


SRL 


A 


2848 


JP NZ.ENVERT 


2788 


INC 


Hl 


IN 


jp 


AUKO 


828 


IN 


A,(BFE> 


1448 


B¿ 


A 


2878 


CALI 1ZOUI 


2718 


LD 


H,(HL) 


191 KEMPS 


ir 


HL, SALTO 


838 


M 


'/.888I1I11 


1478 


Bj| 


A 


7888 ENVERT INC Hl 


2728 


LD 


L.A 


211 


LD 


DE.JOYST 


848 


CP 


•/.mi II 11 


1488 SONY 2 


oír; 


(254), A 


7898 


LD A,(HL) 


2738 


LO 


<IX«1),L 


211 


LD 


<HL),E 


858 


jp 


Z.PREG 


1498 


m 


V488 18888 


2188 


IN A.(BFE) 


2748 


LO 


(IX«2),H 


221 


EM 


HL 


848 


LD 


0,A 


1588 


MU 




2118 


ANO 31 


2758 


LO 


(IX-4),C 


231 


LD 


<HL),0 


878 


LD 


C,2 


1518 


DJNZ SONY2 


2128 


CPL 


2748 


u 


(IX-3),8 


241 


Bfl 




881 


LO 


8,4 


1528 


RE! 




2138 


INC HL 


2778 


LO 


(IX), 1 


258 «FIN 


U 


BC,M 


898 DOBLE 


BIT 


4, A 


1538 TEXT 






2148 


OR (HL) 


2788 


LI 


(IXO).C 


248 


LO 


DEJEXT2 


981 


JP 


z.hasc 


1548 


OEFB 22,18,5,14,2.1 2158 


CP 255 


2798 


LO 


(IX»4),B 


271 


CALL 8283C 


918 


SCA 


A 




9,1 




2148 


JP NZ.CCNT2 


2881 


LD 


(IX«5),E 


2M 


LO 


HL, SALTO 


928 


OJNZ DOBLE 


1558 


OEFB 17,8 


2178 


CALL ABAJO 


2818 


LO 


(IX«4),D 


291 


LO 


DE.KEYBO 


938 


JP 


WKSC 


1548 


m 


'1. JOYSTICK K 2>W 


JP CAMBIA 


2821 


MU 


TABLER 


311 


LD 


(HL),E 


948 HASC 


MU 


C 




EHPSTON' 


2198 CONT2 


INC HL 


2838 


LO 


(IX-4),L 


311 


M 


HL 


958 


jp 


Z, CHECK 


1578 


DEFB 22,12,5,14,4 


2288 


LD A,(HL) 


2841 


LD 


(IX-5),H 


321 


LD 


<HL),0 


948 


Si A 


A 


1588 


D€F« '2. DEFINE CON »«• 


IN A.(BFE) 


2851 


LO 


Hl.NUEPOSM 


331 


LD 


HL, TABLA 


978 


DJNZ 006LE 




TROLES* 


2228 


ANO 31 


2848 


LD 


D,(HL) 


341 


LD 


8,8 


981 (N1ASC LD 


M 


1598 TEXT2 


OEFB 22,18,5,14,7 


2238 


CPL 


2878 


DEC 


HL 


351 


■C* 


A 


998 


LD 


C.L 


1488 


OEFM 'DERECHA ' 


2248 


INC Hl 


2881 


II 


E.(HL) 


341 LIMPIA LO 


(HL),A 


1888 


LD 


HL, TABLA 


1418 


DEFB 22,11,5,14,4 


2258 


OR (HL) 


2898 


DEC 


Hl 


371 


m 


Hl 


lili CCNPAR LD 


A.B 


1428 


DEFN *I?OUIERIM ' 


2248 


CP 255 


2988 


LD 


(HL),D 


381 


DJNZ LIMPIA 


1828 


CP 


4 


1438 


DEFB 22,12,5,14,5 


2278 


JP N2, CANSIA 


2918 


OEC 


Hl 


391 


LD 


til 


1838 


JP 


Z, TOOOS 


1448 


DEFN 'ABAJO' 


7288 


CALL ARRIBA 


2928 


LD 


<HL),E 
(IX-2),E 


4H 


CALL ESPERA 


1848 


LD 


A,E 


1458 


DEFB 22,13,5,14,2 


2298 CAMBIA LD A.(SUITCH) 


2938 


LO 


4)1 PREG 






1858 


V 


(HD 


1448 


DEFN 'ARRIBA ' 


2388 


CP 1 


2948 


LO 


(IX-D.D 


421 


PUSH HL 


1848 


JP 


Z.P0SI8 


1471 ZCONTR DEFB 195 


2318 


JP Z.LNTINP 


2958 


LO 


HL.BUfFER 


431 


LD 


A,L 


1878 


INC 


Hl 


I4B8 


DE FU KFYBO 


2328 


LO Hl.NUEPOS 


2948 


INC 


(HL) 


441 


HM 


A, 9 


1888 


INC 


HL 


1491 KEY80 


DI 




2338 


INC HL 


2978 


INC 


(Hl) 


458 


ID 


Hl, 22528*5 


1898 


INC 


6 


1788 


LD 


IX.D1NEN 


2348 


LD 0,(HL) 


2988 


LO 


A.(ATR) 


441 


ID 


C,A 


1188 


IP 


CCMPAR 


1718 


LD 


C,(IX) 


2358 


DEC HL 


2998 


ANO 


A 


471 


LD 


M 


1118 POSIB 


LD 


M 


1728 


LD 


B.(IXM) 


2348 


ID E .(Hl » 


3888 


JP 


NZ.TOPAIN 


4N 


LD 


A, 32 


1128 


N 


HL 


1738 


LD 


(IX»2),8 


2378 


DEC Hl 


3811 AOJOS 


El 


491 SIMA 


AJO 


ML.BC 


1138 


CP 


(HL) 


1748 


LD 


<IX«3>,8 


2388 


10 HU.D 


3828 


rek 




Sil 


m 


A 


1141 


jp 


N?, NOCHE C 


1758 


LD 


IX.NUEPOS 


2398 


OEC HL 


3131 DEREC 


LO 


A,C 


511 


» 


nz.suna 


1158 


LD 


L,C 


1748 


LD 


L,(IX) 


2481 


LD .HL),E 


3848 


SLA 


A 


521 


LD 


8,11 


1148 


v 


CHECK 


1778 


LO 


H,(IX«I) 


2418 


LD A.(BUFFER) 


3858 


ru 


A 


531 NOFLSH ID 


A,<HL) 


1171 NNNB INC 


8 


I7B8 


FUS* 


HL 


2428 


CALL PUTTER 


3848 


SLA 


A 


341 


IN 


xoiiiini 


1188 


INC 


HL 


1798 


POP 


IX 


2438 


PUSH HL 


3878 


m 


A.2 


551 


LD 


<Hl),A 


1198 


JP 


OCUPAR 


1888 


LD 


HL.ANPOS 


2448 


POP IX 


3888 


AI* 


A.E 


541 


INC 


HL 


1288 TOOOS 


LD 


HL, TABLA 


1818 


LO 


E.(HL) 


2458 


LO (IX),2 


3891 


Rt ' 


C 


571 


DJN2 NOFLSH 


1218 


LD 


A.C 


1828 


INC 


HL 


2448 


CALL TABLER 


3188 


PUSH HL 


5N 


LD 


A.22 


1228 


SLA 


A 


1838 


LO 


D.(HL) 


2478 


LO (IX*I),L 


3118 


LD 


i tmm 


591 


MI 


A,L 


1238 


m 


A,l 


1848 


INC 


HL 


2488 


LO <IX«2),H 


3128 


LO 


A,E 


411 


JP 


NC, NOLLEV 


1248 


jp 


NC^OC' 


1858 


LO 


(HL),E 


2498 


LD (IX«3),C 


3138 


AN 


A,2 


411 


INC 


H 


1258 


INC 


H 


1848 


INC 


HL 


2588 


LD (IX<4),B 


3148 


LD 


E.A 


421 NOLLEV ID 


L,A 


1248 NOC' 


LD 


L¿ 


1878 


LO 


(HL>,0 


2518 


LO (IX«3),E 


3158 


LO 


(HL),E 


431 


LD 


8,11 


1278 


LD 


(HL),E 


1888 


U) 


HL .TABLA 


2528 


LD (IX«4),0 


3148 


LD 


HL.HORIZ 


441 S1FLSH LD 


A,(HL) 


1288 


INC 


Hl 


1898 


LD 


A,(HL) 


2538 


LD H.BUFFER 


3178 


LD 


(HL),2 


451 


N 


128 


1298 


LD 


CHU.O 


1988 


IN 


A,(BFE) 


2548 


INC (Hl) 


3188 


m 


HL 


441 


LD 


(HL),A 


1388 


CALL SONY 


1918 


INC 


HL 


2558 


LD A.(ATR) 


3198 


sn 




471 


INC 


HL 


1318 


LO 


L,C 


1928 


AND 


31 


2548 


AND A 


3281 I20UI 


LO 


A.E 


481 


OJNZ SIFLSH 


1328 


INC 


L 


1938 


CPL 




2578 


JP N2.T0PAIN 


3211 


M 


2 


491 


POP 


Hl 


1338 


LO 


A,L 


1948 


É 


(HL) 


2588 


El 


3228 


»n 


C 



MOVIMIENTO 0 O 
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3231 


PUSH HL 


3878 


WC 


Hl 


4518 


LD (IXMD.O 


5158 


CALL FASTER 


5798 


M 


'¿88888111 


3241 




HL.MUEPOS 


3888 


LO 


0,<HL) 


4528 


LO (IX02M 


5148 


m 


BC 


5888 


M 


A 


3251 


ti 


E>A 


3898 


LD 


H.O 


4538 


LD HL.BUFFER 


3178 


m 


IX 


5818 


JP 


Z, EXACT 


3241 






3988 


LO 


ÍJt 


4548 


INC (HL) 


5188 


jp 


FOLLOU 


5828 


¡Ni 


C 


3271 


u 


-.1 .H,.*,. 


3918 


LD 


DE,ANTD1R 


4558 


JP ADIOS 


5198 ALNT 


PUSH IX 


5838 EXACT 


CALL DIRPAO 


3288 


LO 


'. Hl 1 . 6 


3928 


LO 


A,L 


4548 ZLAUNC LO IX.BFOfO 


5288 


PUSH BC 


5848 FAST 


PUSH BC 


3291 




Hl 


3938 


LO 


<OE),A 


4578 


LO (IX), 195 


5218 


LD 


C,(IXM) 


5858 


LO 


6,8 


3311 






3948 


LO 


A,H 


4588 


10 HL, INTPR 


5228 


LD 


B,(1X«2) 


5848 


PUSH DE 


3311 ABAJO 






3951 


M 


DE 


4598 


LD <1X«!),L 


5238 


LD 


E.(IXO) 


5878 


LOIR 


3321 




Él 


3948 


LO 


(OE),A 


4488 


LD (1X«2),H 


5248 


ID 


D,(IX«4> 


5888 


m 


DE 


3331 


m 


A 0 


3978 


m 


OE 


4418 


LD HL.8FE88 


5258 


LD 


L,(IX»5) 


5898 


m 


BC 


3341 


CP 


19? 


3988 


m 




4428 


LD BC.I88F0 


5248 


LD 


H,(IX«4) 


5988 


LO 


A,0 


3351 


m 


NC 


3991 PUTTER PUSH OE 


4438 ESCRIB LO (HL>,C 


5278 


MU 


INPRESS 


3918 


M 


■/.lililí 11 


3341 


m 


HL 


i!! 


PUSH BC 


4448 


INC HL 


5288 


NJf 


N 


5928 


CP 


7 


3371 


LO 


Hl.NUEPOSM 


41 í 


LO 


B,l 


4458 


DJN2 ESCRIB 


5298 


m 


IX 


5938 


jp 


Z,T(H1 


3381 


sue 


1 




LO 


c¿ 


4448 


LO (Hl),C 


5388 


jf 


FOLLOU 


5948 


INC 


0 


3391 


LD 


M 


4838 


LO 


o.i 


4478 


LD A.8FE 


5318 A80RRA 


PUSH BC 


5938 


JP 


FASTI 


3411 


LO 


<HL),0 


4848 


LO 


E,7 


4488 


ID 1,A 


5328 


LD 


C,(IX«1) 


5948 TON! 


LD 


A,E 


3411 


LD 


HL, VERTI 


4858 


CALI liULTI 


4498 


IN 2 


5338 


LD 


B,(IX»2) 


5978 


AOD 


A, 32 


3421 


LD 


<HL),4 


4848 


IV 


DE.BUFFEM «TU 


¡ti 


5348 


LD 


E,(IX«3) 


5988 


JP 


C.T0N2 


3431 


m 


HL 






HL.OE 


4718 INTPR 


PUSH AF 


5358 


LD 


D,(IX«4) 


5998 


LD 


E.A 


3441 


(Él 




4888 


m 


BC 


4728 


PUSH BC 


5348 


CALL BORRA 


4888 


LD 


A,D 


Mi MW J 


M 


4898 


m 


OE 


4738 


PUSH OE 


5378 


PCP 


BC 


4818 


M 


7 


3441 


SIS 


2 




PET 




4748 


PUSH IX 


5388 


JP 


FOLLOU 


4828 


LO 


0,A 


3471 


RE* 


C 


4111 JDYÍT 


DI 




4758 


PUSH HL 


5398 HLUEGO XOS 


A 


4838 


JP 


FASTI 


3488 


PUSH Hl 


. „ 


LD 


IX, DIÑEN 


4748 


ID C,8 


5488 


LD 


(BUFFER).A 


4848 TOO 


LD 


M 


3491 


LO 


D,A 


4138 


LO 


C,(1X) 


4778 


10 IX.BUFFERM 


5418 


m 


838 


4838 


INC 


0 


3541 


LO 


HL.NUEPOSO 


4148 


LD 


B,(IX«I) 


4788 QUEDA' ID A,(BUFFER) 


5428 


POP 


HL 


4848 FAST 1 


0JN2 FAST 


3SII 


U 


<HL),D 


4158 


LD 


<IX«2),0 


4798 


CP C 


5438 


POP 


IX 


4878 


RET 




3521 


u 


HL .VERTI 


4148 


LD 


(IX«3),8 


4888 


JP 2.HLUE60 


5448 


m 


OE 


4888 BORRA 






3531 


LA 


<HL),1 


4171 


LD 


Ix.NUEPOS 


4818 


LO A, (IX) 


5458 


m 


BC 


4898 


LO 


A.E 


3541 


■■JP 


HL 


4188 


LO 


l,(IX) 


4828 


CP 2 


5448 




AF 


4188 


n 


E 


3551 


m 




4198 


LO 


H,(1X»I) 


4838 


JP Z,AfAST 


5478 


El 




4118 


SOL 


E 


3541 HUI 


LJj 


KL,8 


4288 


PUSH HL 


4848 


CP 1 


5488 


en 




4128 


m 


E 


3571 


LO 


A, 14 


4218 


P 0P 


IX 


4858 


JP Z.ALNT 


5498 fÜWIC 


m 


43312 


4138 


M 


A 


3581 TRIU 


m 


8,E 


4228 


LD 


HL.ANFDS 


4848 


CP 3 


5588 SUITCH EOU 


45588 


4148 


JP 


■.BORttl 


3591 


■ 


Z.TOPI 


4238 


LO 


f ..Hl 1 


4878 


JP Z.A60RRA 


5511 ANPOS 


í(hj 


43381 


4138 


M 


C 


3411 


m 


HL.8C 


4248 


INC 


Hl 


4888 


PUSH BC 


5528 NUEPOS EOU 


45583 


4148 BOfittl CALL D1RPAD 


3411 TOPI 


CCF 


4258 


LO 


0,(HL) 


4898 


LO C,<IX«I> 


5538 BUFFEJt EW 


42888 


4171 BORRA 


PUSH BC 


3421 


H 


0 


4248 


;nc 


HL 


4988 


LD 8,(IX«2) 


5548 SALTO 


m 


42881 


4188 


m 


A 


3431 


■ 


E 


4278 


LO 


(HL),E 


4918 


LD E,(IXO) 


3538 ATR 


m 


45383 


4198 


PUSH DE 


3441 




C 


4288 


INC 


HL 


4928 


LD D,<IX«4) 


5548 DIÑEN 


m 


45384 


4288 HILAN 


LD 


(DE), A 


3451 


| 


B 


4298 


LD 


(HL),0 


4938 


LO A,<IX«5) 


5578 HORIZ 


m 


43588 


4218 


M 


E 


3441 


ccc 


A 


4381 


IN 


A, (223) 


4948 


CALL PAIN1 


5588 VERTI 


m 


45589 


4228 


DEC 


C 


3471 


Jp 


N2.TRIU 


4318 


m 


o* 


4958 


POP BC 


5598 ANTD1R EOU 


43318 


4238 


JP 


NZJILAN 


3481 


El 


4328 


» 


Z.JOYSTI 


4948 FOLLOU PUSH IX 


544» TABLA 


m 


43515 


4248 


POP 


DE 


3491 TABLER LD 


HL.HORIZ 


4338 


CAIL DEREC 


4978 


POP HL 


5418 FASTER LO 


A,E 


4238 


POP 


BC 


3711 


LO 


A,<HL) 


4348 JOYST1 


IN 


A,(223) 


4988 


LD A, 7 


5428 


M 


•/.lililí 11 


4248 


LO 


A,0 


3711 


!NC 


* 


4358 


BIT 


i.a 


4998 


AOO A,L 


5438 


SLA 


A 


4278 


ANO 


ii mi 


3721 


AOD 


A,<HL) 


4348 


JP 


2.JOYST2 


5888 


JP NC.PENSE 


5448 


M 


A.L 


4288 


CP 


7 


3731 


■4 


A 


4378 


CALI I2WI 


5818 


INC H 


5458 


JP 


NC.NAZ 


4298 


JP 


Z.T013 


3741 


PUSH AF 


4388 JOYST2 IN 


A.(2?3) 


5828 PENSE 


ID L.A 


3448 


M 


H 


4388 


INC 


D 


3758 


u 


HL.GRAF1C 


4398 


BIT 


2, A 


5838 


PUSH HL 


3478 HAZ 


LD 


U 


4318 


JP 


B0RRA3 


3748 


LO 


A,<HL) 


4488 


JP 


Z.J0YST3 


5848 


POP IX 


34B8 


PUSH OE 


4328 T0M3 


LO 


A,E 


3778 


M 


HL 


4418 


CALI 


ABAJO 


5858 


INC C 


3498 


LD 


E.ÍHL) 


4338 


ACO 


A, 32 


3788 


LO 


H,<HL) 


4428 JOYST3 1N 


A, (223) 


5848 


JP OUEOA' 


5788 


:nc 


HL 


4348 


JP 


C.TOM 


3798 


10 


L,A 


4438 


Bli 


3.A 


3878 AfAST 


PUSH IX 


5718 


LO 


0,(HL) 


4338 


LD 


M 


3888 


POP 


Af 


4448 


JP 


2 .CAMBIA 


5888 


PUSH BC 


5728 


PUSH DE 


4348 


10 


A.D 


3818 


MI 


M 


4458 


CALL ARRIBA 


5898 


LO l,UX»l> 


5738 


POP 


HL 


4378 


sue 


7 


3828 


jp 


NC.TA6L] 


4448 


JP 


CAMBIA 


5188 


LD H,<1X«2) 


5748 


Pí* 1 


DE 


4388 


iD 


D.A 


3838 


M 


H 


4478 TOMIN 


10 


<1X«7>,4 


3118 


LO C,(IX«3) 


5738 


LD 


A.E 


4398 


jp 


B0RRA3 


3841 TABll 


LD 


L.A 


4488 


LO 


(1X«8),C 


5128 


LD B,<IX«4> 


5748 


m 


E 


4488 T0N4 


LO 


E,A 


3858 


PUSH D€ 


4498 


LD 


(IX«9),8 


5138 


LO E,(IX«5) 


5778 


m 


E 


4418 


INC 


D 


3848 


iD 


E,<HL) 


4588 


LO 


<IXM0),E 


5141- 


LO D.dXU) 


5788 


H 


E 


4428 B0RRA3 


OJNZ BOfttttt 




¿431 


El 




7181 


REI 




7731 TCW21 


LO 


A,L 
E 


6441 DIRPAN PUSH D£ 


7191 DIRPAD LD 


A,D 


7741 




¿451 


PUSH NL 


7111 


BU 


A 


7731 


m 


A,32 


64*1 


pe 


DE 


7111 


BU 


A 


77¿l 


jp 


CJ0H22 


¿471 


CALI DIRPAD 


7121 


m 


XII lililí 


7771 


LD 


L»A 


6481 


PUSH D£ 


7131 


OR 


E 


7781 


LO 


A,H 


6491 


pe 


HL 


7141 


LD 


E,A 


7791 


BUS 


7 


¿511 


PE 


Di 


7131 


LD 


A,D 


7811 


LD 


H,A 


¿311 


El 




ñu 


M 


Xllllllll 


7811 


JP 


INPR3 


¿521 PAJNT 


PUSH Af 


7171 


BR 


A 


7821 T0H22 


LD 


L,A 


¿331 


M 




7181 


w 


A 


7831 


INC 


H 


¿341 


HH 


B 


7191 


SRL 


A 


7841 


JP 


INPR3 


¿551 


BR 


1 


7211 


PUSH Af 


7851 INPR2 


SSL 


L 


¿3¿l 


LD 


A,E 


7211 


LD 


A,D 


7861 


BM 


L 


¿571 


ANO 


Xllllllll 


7221 


M 


Xllllllll 


7871 


n 


L 


¿58* 


ANO 


A 


7231 


LD 


D,A 


7881 


CALL DIRPAN 


¿591 


JP 


2, XEXAC 


7241 


POP 


Af 


7891 


PUSH IX 


¿¿II 


H, 


C 


7251 


1 


0 


7911 


PUSH DE 


¿¿II XEXAC 


LD 


A,D 


72¿l 
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¿,A 


7911 


POP 


BC 


¿¿21 
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Xllllllll 


7271 


LO 


M 


7921 


PE 


DE 


¿¿31 


and 


A 


7281 


REI 




7931 


LD 


A,C 


¿¿41 


JP 


2, YEXAC 


7291 1NPRES PUSH 


K 


7941 1MPR7 


PUSH BC 


¿¿31 


N 


B 


7311 


POP 


IX 


7951 


LD 


M 


¿¿¿1 YEXAC 


BU 


0 


7311 


LO 


A,L 


79¿l 






¿¿71 


M 


D 


7321 


Mi 


Xllllllll 


7971 


PUSH Af 


¿¿81 


M 


D 


7331 


LD 


8, A 


7981 L01R 


LD 


A, (DE) 


¿¿91 


M 


E 


7341 


ANO 


A 


7991 


m 


(HL) 


¿711 


H 


E 


7331 


JP 


Z.INPR2 


8111 


lD 


<HL),A 


¿711 


SIL 


E 


7361 


BE 


L 


8111 
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DE 


¿721 


mu 


DE 


7371 


N 


L 


8121 


N 


L 


¿731 


pnp 


HL 


7381 


w 


L 


8131 


DJNZ LDIR 


¿741 


CALL DIRAT 


7391 


CALL DIRPAN 


8141 


PE 


Af 


¿731 


POP 


Af 
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PUSH DE 


8151 


LD 


8, A 


¿7¿l 


LO 


H,C 
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LD 
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8 
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LO 


C.H 


7421 


LD 
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HL 
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PUSH DE 
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LD 


A,(IX) 


8181 


PUSH Af 
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LO 


■ DE ,m 
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PUSH BC 
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LO 


A,H 


¿811 


m 


DE 
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N 


A 
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C 
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RR 


C 
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CP 


7 
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JP 
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IM 
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8121 


1 
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DE 
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AK 


A,D 


8131 


LO 
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¿841 


LD 


L,A 


7491 


*CP 


(HL) 


8141 
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B 


¿831 


LD 


M 


7311 


lo 


(HL) ,A 


8151 


lD 


L,A 


¿8¿l 


m 


A, 32 


7311 
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L 


8161 


m 


H 


¿871 


jp 


NC, SINCA 


7521 


LO 


D,C 


8171 


jp 


1NPR6 


¿881 


N 


D 


7331 


LD 


C,B 


8181 TTNI 


lD 


A.L 


¿891 






7541 


PE 


BC 


8191 


M 


B 


¿911 SINCA 


LO 


E.A 


7551 


N 


IX 


8211 


m 


A, 32 


¿911 


LD 


A,L 


7561 


DEC 


E 


8211 


jp 


C.TTH2 


¿921 


IM 


PA1NI 


7571 


JP 


N2.1NPR5 


8221 


LD 


L|A 


¿931 






7581 


LD 


A,0 


8231 


LB 


A,H 




El 




7591 


>ÜP 


(HL) 


8241 


BE 


7 


¿931 OlKAT 


LO 


A,H 


7¿ll 


u 


(HL),A 


8251 


LO 


H,A 


¿9¿l 




A 


7¿ll 


PE 


DE 


82¿l 


JP 


1NPR6 


¿971 


y* 


A 


7621 


DEC 
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8271 TTM2 


u 


L,A 


¿981 


sj* 


A 


7631 


El 


2 


8281 


M 


H 


¿991 


AÜO 


A, 158 


7641 


LD 


A,H 


8291 1NPR6 


p<? 


Af 


7111 


LD 


M 
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M 
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8311 
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K 
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LD 
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7661 


CP 


7 
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0JN2 


1NPR7 
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M 


7 
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jp 


2.TBCI 
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7141 


rrca 
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BE 




8341 


LD 


M 
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m 
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LO 


L» 
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w 


1 


161 




M 


7711 


¡Sí 


H 


8361 


El 




7171 


LD 


E.A 


7721 


V 


1NPR3 


8371 7JLA6 









DEMO 1 



s burder e ink 7. paper 0 c 

LEAR 24.999 FOR a =65500 TO 65520 
poke a.0 NEXT a 

10 POKE 65506.3 POKE 65507.16 
POKE 65505,4 POKE 6SS10.56 P 
OKE 65511,199 POKE 65512,80 PO 
KE 65513.195 LORD ""CODE 50000 
LORD • CODE 50500 LORD •""CODE 
51000 RRNDOMIZE USR 63450 RRND 
OMIZE USR 64401 

20 RRNDOMIZE USR 63849 PRUSE 
1: GO TO 20 

6000 FOR A =50000 TO 50030 STEP 2 
POKE R,68 POKE (R*l).197 NEX 
TA GO TO 20 
6010 GO TO 10 



LISTADO 1.1 DUMP: 59.100. N.* BYTES: 30 

LÍNEA DATOS CONTROL 

1 38C73eC778C75«C7B6C7 1499 

2 38C798C738C7F8C718C8 1532 

3 38C738C7D8C738C738C7 1435 



MOVIMIENTO A m 
Y TECLADO H I 



En la linea 2470 comien- 
za a pokear los valores en 
IX según el criterio que ya 
antes te he explicado. Incre- 
menta el contenido de buf- 
fer, para indicar que se ha 
añadido un gráfico, y ob- 
serva si ATR es distinto de 0, 
en cuyo caso debería saltar 
o TOPAIN. 

TOPAIN deja los datos en 
el buffer para que se pinte 
el sprite después de impri- 
mirlo. Finalmente, incre- 
menta de nuevo el conteni- 
do de buffer, regresa y 
vuelve al Basic reponiendo 
las interrupciones. 

En caso de que se hubie- 
ra escogido IMPRES, el pro- 
cedimiento sería muy simi- 
lar. La diferencia sería que 
habría que imprimir dos 
gráficos, uno para borrar el 
sprite anterior y otro para 
imprimir el nuevo. La direc- 
ción del sprite anterior la to- 
maría de ANTDIR, y la po- 
sición del registro IX, en el 
cual la habíamos dejado 
desde la linea 1790. Solta- 
ría a TOPAIN si fuera nece- 
sario, y para finalizar vuel- 
ve al Basic. Con esto hemos 
acabado la segunda parte, 
y llegamos al impresor por 
interrupciones. 



IMPRESOR 
POR INTERRUPCIONES 



La rutina ZLAUNC, en la 
línea 4560, establece las in- 
terrupciones en modo 2. 
ZLAUNC parece excesiva- 
mente complicada, ya que 
las interrupciones se esta- 
blecen con tres órdenes, pe- 
ro no es así. 

Una interrupción se fija al 
cargar en el registro I un va- 
lor que será el byte de ma- 
yor peso de una dirección. 
El byte de menor peso se to- 
ma del valor del bus de da- 
tos, que en teoría debería 
valer 255. 

Sin embargo, el interface 
Kempson puede hacer que 
este valor cambie, y no sa- 
bremos la dirección resul- 
tante. Para solucionarlo, la 
rutina llena desde FE00h 
hasta FEFFh toda la memo- 
ria con el dato FDh. Así cai- 
ga donde caiga la interrup- 
ción siempre tomará como 
valor de salto FDFDh. 

En esa dirección tenemos 
la memoria justa para hacer 
un ¡pINTPR. En INTPR pri- 
mero se salvan todos los re- 



LISTADO 1 .2dUMP:5U«Í.N.*BYTES:257 



CONTROL 



01800100031 ff» 00 •[ v > 
0: , e00ff00ff©o0©0©ff0 

0E7OOF 700F 700F700F70 
0FF00003000FO03E00FE 
03FC03FC05F80EF81F70 
23807BC0E3806F002200 



0000FEC0E2F0FRFCF2FF 
FOFFE2FCFEF0FEC00000 

2O006B00E380 7BC03BB0 

1F700EF805F803FC03FC 

00FEO03E000F00030FF0 

0E300EF00E30OFBO0E30 

0FF000000FF00FF007E0 

07E003C003C00 1800180 

00 1 00038004400DE0 1C 7 

03D60DC40EF81F701FP0 

3FC03FC07F007C00F000 

C0000000000000000000 

0 3/F0F613F /DF F 7BFF 7 

3F770F7F037F00000000 

000000001/ 000F -000/1. M 

7P003FC03FC01FO01F7P 

0EF80DC403D601C700D6 

004 40038001000000000 



879 

996 

634 

589 

1168 

1026 

36 



36 

1054 

1168 

589 

631 

996 

879 

563 

1022 

1001 

192 

1162 

454 

556 

971 

1102 

140 



gistros, y después se ob- 
servo si hay algún gráfico 
que imprimir. Si no hay nin- 
guno, se realiza un rst 38h 
para actualizar el teclado 
con la rutina de la ROM. Si 
estás usando esta rutina 
desde Código Máquina, 
puedes quitar esa orden. 
Para acabar recupera todos 
los registros y vuelve al Ba- 
sic. 

Si hay más gráficos para 
imprimir, el ordenador con 
IX apuntando a la dirección 
del buffer toma el prefijo, y 
en base a él salta a las ruti- 
nas dee preparación de da- 
tos, que son AFAST, ALNT, 
ABORRA y una última que 
los manda a PAINT. A la 
vuelta de cada una de estas 
rutinas, se añade IX 7 y si 
quedan más gráficos se re- 
pite la operación. Finalmen- 
te se pone a 0 buffer y se 
vuelve al Basir . 

Cada una de estar rutinas 
de preparación (AFAST, 
ALNT, etc.), hacen lo mis- 
mo. Toman los datos del 
buffer y llaman a cada una 
de las rutinas de impresión, 
de borrado o de coloreado. 

Empezaré explicando 
FASTER. En ella se toma el 
exceso de bits de desplaza- 
miento con respecto a la co- 
lumna, se multiplica por 2 y 
se busca en la tabla. Des- 
pués se carga en HL la di- 
rección de comienzo del 
sprite, y llama a DIRPAD, 
rutina que calcula la direc- 
ción de la memoria de pan- 
talla donde se debe empe- 
zar a imprimir el sprite. Al 
imprimir cada sean, vuelve 
a tomar el ancho, calcula lo 
dirección de la pantalla que 
está debajo de la anterior 
entre las lineas 5900 y 
6050 y después decremen- 
ta el alto hasta que éste lle- 
ga 0, en cuyo caso vuelve 
al Basic. 

IMPRES es muy parecida; 
la diferencia está en que an- 
tes de imprimir cada byte 
tiene que rotarlo, y pasar 
parte de él a otros bytes. 



Además, si el exceso de 
desplazamiento es 0, salta 
a IMPR2, en la cual lo hace 
más rápidamente, ya que 
no debe rotar nada. 

BORRA empieza en la li- 
nea 6080. Comprueba si la 
posición está desplazada de 
alguna columna, y si es así 
incrementa el ancho en la lí- 
nea 6150. Llama a DIR- 
PAD, para calcular la direc- 
ción en el archivo de panta- 
lla; pone a 0 los bytes de 
pantalla de cada sean; des- 
pués recicla la dirección de 
pantalla y halla la dirección 
del sean inferior del anterior 
entre las líneas 6260 y 
6420. Repite esto hasta que 
acaba con el alto de la zo- 
na a borrar y retorna. 

PAINT empieza por divi- 
dir el alto por ocho y si las 
posiciones horizontales no 
corresponden a alguna co- 
lumna precisamente incre- 
menta el ancho. Llama a Dl- 
RAT, subrutina que calcula 
la posición en el archivo de 
atributos en base a dos 
coordenadas cargadas en 
HL, y devuelve el resultado 
en DE. A la vuelta a la ruti- 
na empieza a llenar la zo- 
na de los atributos con el 
valor del registro A. Des- 
pués calcula la dirección en 
el archivo de atributos de- 
bajo de la actual posición y 
lo repite hasta que acaba 
con el alto. 

Aquí finoliza la explica- 
ción del funcionamiento; 
ahora voy a decirte cómo 
puedes hacerlo. 

USO DE ACTION 

Para empezar, éstas son 
las direcciones para activar 
y desactivar la rutina: 

63450 Origen de la ruti- 
na y dirección donde debes 
llamar para redefinir teclas. 

63849 Dirección de inicio 
de la subrutina de actualiza- 
ción de posición con che- 
queo del teclado. Si vas a 
hacer un movimiento lleva- 
do por esta rutina deberás 



421 fc5FECini_ 



llamarla periódicamente. 
También se encarga de in- 
troducir los datos en el buf- 
fer. 

6440 1 En esta dirección 
se activa el impresor por in- 
terrupciones. Una vez pues- 
to en marcha, no es necesa- 
rio que vuelvas a llamar 
aquí de nuevo. 



65014 Dirección para 
desconectar el impresor por 
interrupciones. Hay dos po- 
sibilidades: que desees usar 
la rutina introduciendo di- 
rectamente en el buffer da- 
tos y esperando a que se im- 
priman o definiendo las te- 

I cías y llamando a la rutina 

I del teclado. 



DEMO 2p. 



S BORDER 0 PRPER © INK 7: C 
LS FOR a =65500 TO 65515 POKE 
a,0 NEXT a POKE 65500,1 POKE 
65505,6 POKE 65506,2 POKE 6550 
7,16 POKE 65512,8© POKE 65513, 
195 LORD ••CODE 50000: LORD "C 
ODE 51000 RRNDOMIZE USR 63450 
RRNDOMIZE USR 64.401 

10 RRNDOMIZE USR 63849 PAUSE 
1: GO TO 10 

6000 FOR R =50000 TO 50030 STEP 2 
: POKE R,56 POKE (R*l),199 NEX 
T R 

6010 GO TO 10 



Si piensas hacer lo prime- 
ro, deberán introducir los 
datos como ya he expuesto 
antes. Para ello deberás to- 
mar el contenido de buffer, 
multiplicarlo por 7 y añadir- 
le al resultado 62001. En- 
tonces tendrás la dirección 
donde debes colocar los da- ' 
tos. Los introduces, incre- 
mentas el contenido de buf- 
fer y ya está. 

Te recuerdo que cuando 
uses IMPRES, la dirección 
será la del propio gráfico, y 
si usas FASTER la dirección 
será la de una tabla con las 
direcciones de los gráficos 
desplazados. 

Si usas la rutina del tecla- 
do, lo primero que debes 
hacer es darles a las varia- 
bles los contenidos correc- 
tos. Piensa que si trabajas 



con IMRES entonces debe- 
rás hacer una tabla, y si 
usas FASTER dos tablas, 
aparte naturalmente de los 
propios gráficos. La prime- 
ra tabla debe tener las di- 
recciones de los gráficos, (o 
de las segundas tablas, en el 
coso de FASTER) y se debe 
de poder acceder a ella su- 
mando VERTI y HORIZ, mul- 
tiplicando el resultado por 
dos y añadiéndole GRAFIC. 
En el contenido de la posi- 
ción de memoria resultante 
se debe de encontrar la di- 
rección de inicio de otra ta- 
bla o del gráfico, según el ti- 
po de impresión. Cuando es 
otra tabla, es señal de que 
se usa FASTER, y en esa ta- 
bla deben estar las direccio- 
nes de inicio de cada gráfi- 
co desplazado. Para acce- 



LISTADO 2.1 

DUMP 50 Cae N.° BYTES: 30 



00R80000000000000000 168 



LINEA 



44C544CS64C554C584C5 1437 
000074CS0000R4C5B4C5 1051 
0000000094C538C738C7 855 



LISTADO 2.2 
dump: sesee. n.° bytes: 129 



LÍNEA 



DATOS 



O0028C80000 671 



88C90000C8C9000008CR 948 
000038CR000076CR0000 580 
B0CR0000F8CR000028CB 1079 
000068CB0000R6CB0000 678 
E8CB000018CC000058CC 955 
000098CC0000D8CC0000 776 
08CD000048CD000088CD 831 
0000C8CD0000F8CD0000 858 
38CE000078CE00000000 588 



LISTADO 2.3 

DUMP: 51.#ee. N.° BYTES: 1921 



LÍNEA 



000000000000000C0000 
00000000000F000000D0 

B00003DFBC0007CF3E00 
03D0BC00001F800007C0 
3E0O055F940007C53EO0 
02802R00000000000000 
00030000000000000003 
C00000342C0000F7EF00 
01F3CF80OOF42F0O0007 
E0000 1F00F800 157E500 
0 1 F 1 4 F 8000R00R600000 
000000000000C0000000 
00000000F000000D0B00 
003DFe.CB00 ?Cf :3L0003C' 
0BC00O01F800007C03E0 
005SF940007C53E00028 



CONTROL %l 



00000000000000040000 
180000667003 19C80ER7 
24 1D9CC40B73 1030EC48 
2F111037B440383BOO1C 



0006000000 199C0000C6 
72O003R9C90007673100 
O2DCC4000C3B 12000BC4 
440005ED10000E0CC000 
07070000000000000000 
00004000000 180000006 
6700003 19C8000ER7240 
01D9CC400OB731O003OE 
C48002F 1 1 1000 17B4400 
038330000 1C 1C0000000 



0000003C000342C00F7E 462 
F01F3CF80F42F0007EOO 1026 
1FO0F8157E501F14F80R 815 



6000000 1 99C 0000C 6 720 
003R9C90007673 10002D 
CC4000C3B12000BC4440 
005ED10000E0CC000070 
70000000000000000000 
000006FDF40ED6800EFE 
00004808 1 F F F F 8200004 
0DB6D8222 114044224 IB 
6DB00000000000000000 
0000000001BF7D0003B5 
R00003BF800000 120200 
07FFFE000800010002DB 
6C0001 10880008884500 
036DB400000000000000 
0000000000000000006F 
DF4000ED680000EFE000 
0004808001FFFF800200 
0040016DB68000221100 



12 
223 
866 
757 
576 
172 
6 

774 

877 

925 

747 

192 

264 

1156 

603 

669 

162 

4 

647 
915 
522 



385 

646 

714 

544 

14 

199 

848 

735 

776 

568 

16 

589 

652 

992 

843 

112 

1127 

650 

631 

285 

501 

502 

746 

474 

292 

111 

1091 

901 

535 



100 
101 
103 
104 
105 
106 
107 
109 
110 
111 
112 
113 
116 
117 
118 
119 
120 
122 
123 
124 
125 
127 
128 
129 



02442240016DB6800000 
000000 1BF7D0003B5R00 
003BF80000012020007F 
F FE 0008000 10002DB6C0 
009 10890000884 40005P 
DB600000000000000000 
F000033C0003D00001D6 
001C0180233C4024CF18 
19301C061BCC01BB9C00 
70380000000000000000 
003C000000CF000000F4 
00000075800007006000 
08CF 10000933C600064C 
07000 186F300006EE 700 
001C0E00000000000000 
00000000000F00000033 
C000003D0000001D6000 
01C018000233C400024C 
F 180019301C00061BCC0 
001BB9C0000703800000 
00000000000000000003 
C000000CF000000F4000 
0007580000700600008C 
F 10000933C600064C070 
00186F3000O6EE700001 
CeC00000000000000000 
0000003C0007F3E00F72 
F01B1CD80F7EF0000000 
1F7EF8 155450 1F28F80R 
00R80000000000000000 
00000000000F000001FC 
F80003DCBC0006C 73600 
03DFBC000000000007DF 
BE000555140007CR3E00 
02802R00000000000000 
00000000000000000003 
C0O0007F3E0000F72F00 
01B1CD8000F7EF000000 
000001F7EF800 1554500 
0 1F28F8000R00R800000 
00000000F000001FCF80 
003DCBC0006C7360003D 
FBC000000000007DFBE0 
00555 140007CR3E00028 
02R00000000000000000 
0r0B023CC0000BC0006P 
80018038023CC416F324 
380C9833D86039DD80 1C 
0E000000000000000000 
0003C000000F30000002 
F00000 1RE00000600E00 
0 0 8 F 3 1 00063CC9000E03 
26000CF6 1 8000E 7 76000 



588 
631 
4 99 
1042 
591 
315 
729 
583 
682 
168 
511 
348 
571 
726 
42 
66 
378 
544 
1187 
542 
3 

523 
353 
948 
540 
416 
663 
892 
919 
168 
268 
918 
644 
571 
172 
3 

675 

997 

770 

812 

606 

836 

1043 

781 

162 

577 

874 

1017 

14 

260 

600 

4 76 

549 



MOVIMIENTO m 0% 
Y TECLADO 40 




der o ella debe tomar el ex- 
ceso de pixels que nos resul- 
ta de restar la posición X de 
la columna de pantalla de 
su izquierda. El resultado es 
un número entre 0 y 7. Des- 
pués lo multiplicas por dos 
y lo añades al inicio de esta 
segunda tabla, para tomar 
de esa dirección la posición 
de inicio del gráfico despla- 
zado. Esto último lo realiza 
la propia rutina FASTER. 

Es evidente que antes de 
mover así un sprite deberás 
de haber introducido estas 
tabla(s) en la memoria, se- 
gún indique GRAFIC, que 
normalmente vale 5000(9 . 

Para dar color al sprite 
que estás moviendo dale a 
ATR un valor distinto de 0, 
con el cual coloreará los 
atributos del sprite. 



131 070380000000000130000 

133 00000000O000F0000003 

134 CC000000BC000006B800 

135 001803800O23CC40018F 

136 32400380C980O33D8600 

137 039DD80001C0E0O00000 

140 3C000000F30000002K00 

141 0001RE00000600E00008 
US F3100063CC900OE0326O 
143 00CF618000E776000070 

.38000000000000000000 

iw# 701012001FFFF8200004 

148 ODB6D0244224O884401B 

149 6D680000000000000000 

151 0O00OO0O0BEFD800O05P 

152 DC00001FDC0004048000 

153 07FFFE000800010005B6 

154 DP0O0221 100009106900 

155 05B6OP00000000000000 

157 000000000000000002FB 

158 F6000016B7000007F700 

159 0101200001FFFF800200 

160 004000DB6D0000442200 

161 0288444000B6DB000000 

164 O0O000BEFD8OOO05PDC0 

165 0001FDC000404800007F 

166 FFE000800010006DB6C0 

167 ©0R211100O91O88O0036 

168 DB600000000000000000 



146 



18000E66001398C024E5 
702339B808CEO01237OC 
0888F4022DE800CC 1C00 



00000000000000080000 
000600000399800004E6 
300009395C0008CE6E00 
0233B40004BDC3000222 
3D0O0O8B7PO00033070O 
000E0E00000000000000 
00020000000 1800O00E6 
600001398C00024E5 700 
02339B8OO08CED8OO123 
70C000888F400022DE80 
000CC 1C0O0038 380O000 



60000O39988O004E6300 
009395C0008CE6E00023 
3840004 8DC30002223D0 
0008B7P0000330700000 
E0E00000000000000000 



138 

793 
350 

413 : 

1076 

893 

56 

661 

716 

772 

213 

556 

607 

712 

431 

405 1 

253 

705 

675 

494 

671 

941 

709 

1106 

530 

315 

32 

768 

695 

899 

112 

8 

524 

5 30 

609 

380 

28 

361 

461 

749 

103 1 

659 

128 

482 

1117 

740 

514 

448 



LAS DEMOSTRACIONES 

Antes de nada te diré que 
te parecerán muy largas de 
introducir, especialmente la 
segunda. Pues bien, para 
que puedas seguir viendo la 
demostración puedes usar 
un truco. En el DUMP del 
blque de bytes segundo de 
la primera demostración in- 
troduce tan sólo 32 como 
duración. De esta manera, 
sólo tendrás que teclear 
cuatro líneas de texto. Des- 
pués, sálvalo normalmente 
y mientras se ejecute el pro- 
grama, haz BREAK y GO 
TO 6000. Así apreciarás el 
movimiento, aunque el grá- 
fico no tomará direcciones 
distintas según éste. 

Para hacerlo en la segun- 
da rutina, deberás introdu- 
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5 BORDER 0 PRPER 0 INK 7 
LEPR 24999 

7 LORD " C0DE 50000 LORO " , 
OOE 51000 LORO •••CODE 540O0 RP 
NDOMIZE USR 64401 

10 FOR 4=49000 TO 49120 POKE 
P.136 NEXT P FOR P=49080 TO 49 
120 POKE R,136 NEXT P 

20 LET M =4 9005 LET L =49050 
30 FOR P=PI TO O STEP -0.07 _ 
ET K=(176-((5IN P>*30*4©>) POKE 
M,K POKE L.K LET M=M*1 LET L 
*L*1 NEXT P 

35 PRIjjj PT 21 ,0, 

40 LET C=USR 540Oe 



LISTADO 3.1 

DUMP: 50.000 N.° BYTES: 30 



LÍNEA 



CONTROL 



38C7000098C700O018C8 830 
000098C80OOOF8C718C8 1023 
38C738C7D8C738C738C7 1435 



441 EsPEdinL 





LISTADO 3.2 

DUMP: 51.000. N.° BYTES: 

LINEA DATOS 



ES: 481 DUM 

CONTROL LÍNEA 



LISTADO 3.3 

DUMP: 54.000. N.° BYTES: 

LÍNEA DATOS 



CONTROL 



00000000000000500010 96 

RC000554000RBE00056C 574 

0000F000007C00000000 364 

00E80001E40003C40003 663 

840007816007ED6003CC 943 

00000000008000007000 252 

003C001E5E001BEE001F 480 

F70019E7081003800002 652 

800003C00003E0000000 550 

00000000000R00000055 95 

■:^O^mm ; ?^^;' ■> 00(3 7 ce 

002O8000001E0000000F 218 

80000000000000100000 157 

001C8000001C80000038 368 

S00000380000003F6000 343 

001F600000000000001F 158 

8000000F800000078000 406 

00078000000380000003 269 

P0000007R00000072000 366 

000D7000000F30000007 195 

80000001800000000000 257 

00000022800000556000 343 

00RRR0000015F000O00B 602 

6000000780000003E000 458 

00000000000340000007 74 

20000007c>00000 1 .^0(30 l¿b 

003780000017F600000B 463 

F6000000000000040000 250 

0003E0O00003E00000F3 697 

E00000DFD00000FFB800 1094 

00CF380000801C000000 419 

140000001E0000001F00 81 

0000R00000055800002R 295 

R80000157C000002D800 531 

0001E0000000F8000000 473 

00000001D0000001C800 410 

0001C800000388000003 343 

80000003F6000001F600 624 

000000000001F8000000 249 

F80000007C0000007C00 496 

00001C0000002E000000 74 

2E0000006E0000004E00 234 

0000ER0000006F000000 345 

37800000000000000000 183 



2168BF0673DD2131F2DD 1215 

360303DD3604200E00DD 606 

360002DD360150DD3602 689 

C3F3DD71050C0C7EDD77 1267 

0623DD36FF01FB7610ED 1194 

f Q0O0000000P00000000 ¿0 1 



JL 



LISTADO DESENSAM- 


BLADOR DEMO 3.3 


ñu 


M 


54IM 


5391 


Lü 


HL ,49111 


8411 


LD 


8,115 


Mil 


LO 


IX,8UfFER«l 


8428 


u 


(1X«3),3 


8431 


lD 


<1X«4),32 


8441 


LO 


C» 


8451 


LO 


<IX),2 


8441 


Lí 1 


(1X.D.8I 


8471 


LD 


(1X«2),I95 


8481 0O40 


01 




8491 


LO 


(1X«5),C 


8311 


N 


C 


8311 


m 


C 


8528 


LD 


A,<K) 


8531 


LÜ 


! 1 ' o .h 


8541 


M 


* 


8551 


LD 


(IX-l).l 


8561 


El 




8571 


HM.T 


8584 


WN2 DO* 


8591 


El 





cir ton sólo 24 lineas de tex- 
to del segundo bloque de 
byfes, y escribir como dura- 
ción 240 bytes. Sálvalo, y 
después de ejecutar el pro- 
grama, haz BREAK y GO 
TO 6000. 

En cuanto al tema de las 
demostraciones, la primera 
hace empleo de IMPRES pa- 
ra mover por la pantalla 
una flecha con las teclas re- 
definidas. 

Lo segundo realizo el mo- 
vimiento de un tanque con 
una ligera animación de las 
orugas en el movimiento 
horizontal. 

La tercera sirve para mos- 
trar como también se pue- 
den hacer con esta rutina en 
el movimiento de persona- 
jes secundarios, en este ca- 
so con animación. 

Esta demostración funcio- 
na introduciendo datos di- 
rectamente en el buffer. Re- 
presenta a una chica co- 
rriendo y dando saltos. Los 
saltos los he conseguido me- 
diante los datos de una fun- 
ción seno. 

La cuarta y última demos- 
tración borra y pinta espa- 
cios de pantalla al meter da- 
tos en el buffer desde el pro- 
pio Basic. 

Un último apunte sobre la 
rutina; si quieres usar el con- 
trol de teclado pero con dis- 
tinta velocidad en el movi- 
miento, cambia los valores 
numéricos de las líneas 
3070,3130,3210,3310 y 
3460 por otro valor. 



DEMO 4p. 



10 BORDER 0 PRPER 0 INK 7 C 
LS CLERR 24999 

20 LET C=USR 64401 FOR * =0 T0 
25S STEP 2 PLOT a.0 DRRU 0,17 
5 NEXT a 

30 FOR a=0 TO 20 LET anc=INT 
(RND*31) LET alt=INT (RND#170) 

LET x=INT (RNDf (31-anc ) ) LET V 
= INT ( RND * ( 192-a l t ) ) 

40 POKE 62001,3 POKE 62002, an 
C POKE 62003.a l t POKE 62004.x 

POKE 620©5.y POKE 62008,4 POK 
E 62009. anc POKE 62010,alt POK 
E 62011.x POKE 62012, u POKE 62 
013. (INT (RND4255) ) POKE 62000. 
2 PRUSE 1 

50 NEXT a 




La historia de un mago convertido en rana. Su tarea, 

encontrar el hechizo que le devuelva su apariencia hu- r 

mana. La prestigiosa revista Micromania ha dicho de K 

este juego: "Un programa de sorprendente originali- j 

dad y un índice de adicción elevadísimo." Todo lo que 2 
necesitas para pasarlo de miedo. 



EXPRESS RAIDER 

Como en las clásicas películas del Oeste, estarás en el 
centro de la acción desde el principio. Asaltos al tren, 
lucha sobre los vagones, cabalga sobre tu rápido ca- 
ballo... EXPRESS RAIDER lo tiene todo. 




I 



Toda rutina concebida 
para manejar gráficos 
y desplazarlos a lo 
largo y ancho de la 
pantalla, debe 
cumplir algunos 
requisitos básicos y 
de entre ellos cabe 

señalar como 
fundamental, el que 
sea capaz de detectar 
si se ha producido un 



ETECCION 

V choque entre sprites m 

para poder obrar en j^^^ fl 

consecuencia. Con ^^^B fl 

ut 



este artículo se 
pretende dar una 
¡dea clara de las 
técnicas que podemos 
utilizar para 
conseguirlo. 
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fl^^ esulta difícil ima- 

U~^m ginar una rutina 
flh^^ que mueva un 
cierto número de 
M figuras por la pan- 

talla, sin asignarles unas 
coordenadas —verticales y 
horizontales— a partir de 
las cuales podamos empe- 
zar a imprimir los sprites y 
también, partiendo de ellas, 
conocer si dos —o más— de 
estas figuras se han puesto 
en contacto. 

Basándose en esta premi- 
sa, se hace evidente la ne- 
cesidad de una rutina que 
se encargue de transformar 
estas coordenadas en la di- 
rección del fichero de ima- 
gen —desde 16384d hasta 



22527d— a la que corres- 
pondan. Ríos de tinta se han 
vertido a fin de explicar la 
forma en que éste está or- 
ganizado en el Spectrum. 
Organización que, por otra 
parte, más de uno podría 
calificar de «caótica» al oír 
hablar de ella por vez pri- 
mera. Es de suponer que 
muchos lectores conocerán 
el tema en profundidad, pe- 
ro para aquellos que nunca 
se nan aventurado a inter- 
narse en el tortuoso mar de 
la pantalla del Spectrum, 
trataremos de explicar bre- 
vemente su configuración y 
la manera en que podemos 
solventar los problemas que 
esto nos plantea. 



WQUES 

Enrique LÓPEZ MARTÍNEZ 



El fichero de imagen, sin 
los atributos, ocupa 6l44d 
bytes y se encuentra dividi- 
do en tres bloques bastante 
diferenciados entre sí; de tal 
modo que si queremos pa- 
sar de una línea de la pan- 
talla a la inmediatamente 
inferior, tenemos que sumar 
el valor 256d a la dirección 
en cuestión en lugar de 32d, 
como cabría esperar. 

La cuestión se complica 
todavía más si esa línea es- 
tá en un tercio diferente al 
que nos encontramos, con 
lo cual en vez de 256d tene- 
mos que sumar 2048d a la 
dirección en la que estemos 
en dicho momento. 

El problema estriba, por 
lo tanto, en conocer nuestra 
situación y la cantidad que 
debemos de sumar, o res- 
tar, a esa dirección para ir 
a donde pretendemos. 

La solución la tenemos en 
la propia ROM del ordena- 
dor, concretamente en la 
posición 22AAh -8874d— 



y su nombre es PIXEL-AD. 

La utilización de esta ruti- 
na es sumamente simple: 
basta llamarla conteniendo 
en el registro B el valor de 
la coordenada vertical, y en 
C el de la horizontal. La di- 
rección del fichero de ima- 
gen correspondiente a esas 
coordenadas, nos será de- 
vuelta en el registro doble 
HL 

Una última «pega» queda 
por resolver; y es que 
PIXEL-AD no fue concebida 
para operar en la parte in- 
ferior de la pantallo —don- 
de el Spectrum presenta los 
mensajes de error y efectúa 
los INPUTs. 

Para arreglar esto, basta 
cargar el acumulador con el 
valor 191d y llamar a la ru- 
tina dos direcciones más 
adelante con lo cual, para 
nosotros, PIXEL-AD va o es- 
tar situada en la posición 
8876d, teniendo en cuenta 
que el valor mínimo — 0 — 
de la coordenada Y se en- 



contrará en la última línea 
de la pantalla, mientras que 
el máximo —191— se loca- 
lizará en la primera. 

Una vez resuelto el pro- 
blema que supone trabajar 
directamente con el fichero 
de imagen, ya podemos 
plantearnos la tarea de con- 
feccionar nuestra rutina. Y 
vamos a intentar desarrollar 
una que mueva tres objetos 
por la pantalla: un revolver, 
una bala, y algo a lo que 
disparar. Una cruz, por 
ejemplo, podría ser un blan- 
co perfecto, aunque centra- 
remos nuestra atención en 
la subrutina que se encarga 
de comprobar si el disparo 
y la cruz han colisionado. 



EL PROGRAMA 

La rutina se encuentra 
profundamente comentada 
en el listado ensamblador, 
pero no estará de más re- 
calcar algunos aspectos dig- 
nos de consideración. En 
primer lugar, cabe señalar 
que los gráficos los vamos a 
imprimir utilizando XOR 
— u OVER 1—, con lo cual 
a la hora de borrarlos bas 
tará con imprimir la figura 
por encima de la que desee- 
mos hacer desaparecer y el 
fondo quedará restableci- 
do. Existen dos maneras de 
imprimir los gráficos em- 
pleando esta técnica; la pri- 
mera de ellas, que es la que 
va a ser usada por nosotros, 
consiste en borrar el sprite 
anterior «de una sola vez» e 
imprimir el actual del mismo 
modo. Esto presenta el in- 
conveniente de que, entre el 
borrado y la impresión del 
gráfico, transcurre un tiem- 
po durante el cual vamos a 
tener grandes posibilidades 
de que el haz de la televi- 
sión se encuentre barriendo 
esa zona de la pantalla y en 
virtud de esto, conseguire- 
mos obtener un desastroso 
efecto de parpadeo. 



La otra posibilidad es bo- 
rrar una línea de la figura 
antigua, imprimir una de la 
actual, continuar borrando 
la anterior y así sucesiva- 
mente hasta completar la 
impresión del gráfico. Esta 
técnica disimula un poco 
más el parpadeo —muy si- 
milar, por cierto, al que te- 
man la mayoría de los jue- 
gos antiguos— que la pri- 
mera, pero tampoco consi- 
gue evitarlo. 

Por suerte para nosotros, 
el microprocesador Z80 dis- 
pone de una instrucción lla- 
mada halt, que lo introduce 
a «no hacer nada» —salvo 
continuar refrescando la 
RAM— hasta que se pro- 
duzca una petición de inte- 
rrupción o un reset, la cual 
nos va a ayudar a lograr 
que nuestros gráficos no 
parpadeen jamás, acen- 
tuando el efecto de suavi- 
dad en los desplazamientos; 
aunque no movamos las fi- 
guras pixel a pixel. 

Para que esta instrucción 
funcione, ojo, las interrup- 
ciones han de estar habilita- 
das —líneas 200 a 220 del 
programa — . En caso con- 
trario el ordenador se col- 



gará de forma irreversible. 

Los buenos resultados con 
la utilización de halt depen- 
den, en la mayoría de los ca- 
sos, de la experimentación, 
es decir, si a pesar de todo 
hay un sprite que se obstina 
en seguir parpadeando, de- 
bemos cambiar la ubicación 
de halt dentro del progra- I 
ma hasta conseguir que de- II 
je de hacerlo. 

Desgraciadamente no 
siempre resulta tan sencilla; 
en los casos más «rebeldes» 
suele ser eficaz la utilización 
de un bucle — antes o des- 
pués de halt — como el pro- 
puesto a continuación y va- 
riar el valor de HL hasta lo- 
grar que el molesto parpa- 
deo desaparezca por com- 
pleto: 



HALT: Paro del Z80 

LDHL,500d: Valor inicial 
del bucle 

LOPP DEC HL: Decrc- 
mento HL 

LD A,H 

OR L: ¿Es cero? 

JRNZ,LOOP: Si no lo es, 
continúa decrementando 
HL 
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RESTO DEL PROGRAMA 

Continuando con el aná- 
lisis de la rutina, vamos a in- 
tentar explicar con breve- 
dad su funcionamiento. Co- 
mienza haciendo una llama- 
da a las subrutinas REVOL 
y CRUZ —lineas 450 a 650 
y 660 a 860 respectivamen 
te— cuya misión es, como su 
nombre indica, imprimir el 
revolver y la cruz, partien- 
do de las coordenadas ver- 
tical y horizontal contenidas 
en el registro doble BC. Es- 
ta operación resulta impres- 
cindible puesto que si no lo 
hiciésemos asi, al estar em- 
pleando XOR, observaría- 
mos cómo extrañas cosas 
empezarían a ocurrir en la 
pantalla o, en otras pala- 
bras, la primera impresión 
de ambos gráficos perma- 
necería sin borrarse. 

A continuación, nos en- 
contramos con la etiqueta 
PRINC, estamos ante el bu- 
cle principal del programa 
-líneas 40 a 250- el cual 
se encarga de chequear el 
teclado y llamar a las subru- 
tinas ARRIBA —líneas 260 a 
350 ABAJO -líneas 360 a 
440- y disparo (DISP) -lí- 
neas 1310 a 1400- o salir 
del programa si SYMBOL 
SHIFT está pulsada. El retor- 




no al Basic lo haremos a tra- 
vés de la subrutina CHO- 
QUE; ésta tiene como obje- 
to restablecer ciertos valo- 
res del programa, que más 
adelante veremos, y habili- 
tar las interrupciones para 
poder salir al Basic en caso 
de que se confirme una co- 
lisión, por lo cual podemos 
perfectamente servirnos de 
ella para este fin. 

Seguidamente, hace una 
llamado a las subrutinas 
MCRUZ -líneas 1590 a 
1870- y MDISP -líneas 



1410 a 1580-, las cuales 
se encargan del movimien- 
to de la cruz y el disparo, si 
lo hubiera, respectivamen- 
te. 

IDEN y DIREC son dos 
bytes señalizadores utiliza- 
dos por ellas. El primero in- 
dica con un uno la existen- 
cia de un disparo en panta- 
lla o con un cero su ausen- 
cia. El segundo adopta el 
valor «cero» si la cruz tiene 
que moverse hacia arriba o 
el «uno» si tiene que hacer- 
lo hacia abajo. 



Por último salta a la ruti- 
na COMPR, la cual si no se 
ha detectado un choque nos 
devuelve al bucle principar- 
en caso contrario retorna al 
Basic. 



COMPROBACION 
DE CHOQUE 

La filosofía seguida en 
nuestra rutina para detectar 
una posible colisión entre 
sprites, responde al siguien- 
te esquema: 





IX, TABLA— . De este modo, 
serio posible tener en 
(IX + 0), lo ordenada; en 
IX + 1 ), la abscisa; en 
IX + 2), la fase, etc. 

De cualquier manera, no 
parece demasiado práctico 
el hacer uso de todo esto en 
nuestra rutina, cuando sola- 
mente pretendemos que 
una única bala se desplace 
por la pantalla. 

Prosiguiendo con lo su- 
brutino COMPR, intentare- 
mos profundizar un poco en 
ella, a fin de entender su 
funcionamiento, que dista 
mucho de ser complicado. 

En primer lugar, señalar 
algo que de por sí ya resul- 
ta bastante obvio para que 
un sprite se mueva hacia la 
derecha, es preciso incre- 
mentar su abscisa tantas 
unidades como desplaza- 
mientos queremos que efec- 
túe —nuestro disparo se 
mueve de cuatro en cuatro 
pixels— ; del mismo modo, 
para que lo haga hacia arri- 
ba debemos incrementar su 
ordenada. Y decrementar 
ambas para que se despla- 
ce en sentido contrario. 

Partiendo de que el dispa- 
ro se realiza desde lo iz- 
quierda de la pantalla, su 
coordenada horizontal ha 



Las etiquetas VARI, 
VAR2, etc., que pueden ob- 
servarse en el listado, están 
referidas a los parámetros 
verticales y horizontales de 
cada gráfico y su significa- 
do es: 

VARI: Ordenada del re- 
volver. 

VAR2: Ordenada de la 
cruz. 

VAR3: Ordenada de la 
bala. 

VAR4: Abscisa de la bola. 
VAR5: Abscisa de la cruz. 

En nuestro caso, no es po- 
sible efectuar un nuevo dis- 
paro hasta que el anterior 
haya desaparecido de la 



pantalla, aunque no resulta 
demasiado complicado el 
hacer que esto no sea asi. 

Si queremos manejar grá- 
ficos, lógicamente debere- 
mos disponer de una tabla 
en memoria, que nos infor- 
me cuál es la situación de 
cada uno de ellos —también 
puede indicarse su fase y 
color, si los tuviera, o lo di- 
rección en que debe despla- 
zarse— a fin de que poda- 
mos ir moviéndolos secuen- 
cialmente, o llegado el ca- 
so, hacer que alguno desa- 
parezca. 

No es mala práctica el ac- 
ceder a uno tabla de este ti- 
po, mediante el registro in- 
dexado IX —formato LD 



LISTADO 1 



> CLCRR 39 
LORD • •■•COD | 



TO 2B _2 . — A«»<-t<M1 



' p¿S h« T DC = 5 C R MULTIPLO OC 8 I 
"|g. POKE R *8W^P OR «|M o U«LO oRIZO , 



PRINT RT f .8 
~%T 4.31. 



98 PRINT «¿ 
IT 8.31. I ° 



Í N * ?t? T p?'!'.3i> 



\lé, PRIN? R RT 2.4.-3VMB0L 3MIFT 
°180 CO TO 158_ 



DETECCIÓN DE CHOQUES 



53 



de ser, al menos, igual o un 
cierto número de veces — 
nosotros decidimos cuán- 
tas— mayor que la de la 
cruz. En tal caso, la sustrac- 
ción entre ambas deberá 
ser un número positivo. 

De otro modo, querría 
decir que la bala — horizon- 
talmente— todavía no ha 
llegado a la altura de la 
cruz. 

En el supuesto de que el 
disparo se moviese de dere- 
cha a izquierda, sería nece- 
sario seguir los mismos pa- 
sos, pero a la inversa, es de- 
cir, restar de la abscisa de 
la cruz, la de la bala, mirar 
si su resultado es positivo y 
obrar en consecuencia. 

Volviendo al caso que nos 
ocupa, lo siguiente es com- 
probar cuántas veces es 
mayor la abscisa del dispa- 
ro que la de la cruz. 

Considerando que esta 
última ocupa 16 pixels de 
ancho, si el resultado de la 
resta fuese, pongamos por 
caso, dos. Significaría que el 
disparo se encuentra dos pi- 
xels a la derecha de la po- 
sición actual que ella ocupe. 
En nuestro ejemplo, se ha 
considerado el número 12 
como un valor aceptable, 
por lo que si la diferencia 
fuese mayor que esta canti- 
dad, se retorna al bucle 
principal sin hacer más com- 
probaciones. 

En caso contrario, las 
coordenadas horizontales 
están ya suficientemente 
chequeadas, ocupémonos 
ahora de las verticales. 

El proceso a seguir es muy 
similar al anterior: restamos 
a la coordenada Y de la ba- 
la, la de la cruz, si el resul- 
tado es positivo y menor de 
dos — scans verticales que 
ocupa el gráfico del dispa- 
ro— querrá decir que la ba- 
lo se encuentra impresa, co- 
mo máximo, dos posiciones 
por encimo del gráfico de la 
cruz, con lo cual se hace evi- 
dente una colisión entre am- 
bos sprites. Si la diferencia 
fuese mayor de dos, la ba- 



la se encontraría por enci- 
ma de la cruz, pero sin lle- 
gar a entrar en contacto 
con ella, si es así, podemos 
regresar sin más miramien- 
tos al bucle principal. 

En cambio, si la resta no 
dio como resultado un nú- 
mero positivo, es fácil llegar 
a la conclusión de que el dis- 
paro se encuentra por de- 
bajo de la cruz. Sólo nos 
queda comprobar si está a 
menos de 15 —scans verti- 
cales que ocupa el gráfico 
de la cruz, menos uno— po- 
siciones de distancia de és- 
ta; en caso afirmativo se po- 
ne de manifiesto la existen- 
cia de un choque. De lo con- 
trario se retorna al bucle 
principal. 

Para finalizar, es posible 
que alguien se pregunte por 
qué, en el listado Basic la 
abscisa de la cruz es siem- 
pre un número múltiplo de 
ocho. 

La respuesta es muy sim- 
ple: como no está pensado 

3ue se mueva hacia los la- 
os, si intentamos imprimir- 
la en una coordenada hori- 
zontal que no sea múltiplo 
de ocho, el gráfico tenderá 
a aparecer en una que si lo 
sea, de lo que se despren- 
de que su posición en pan- 
talla no coincidirá con el va- 
lor asignado a su abscisa, 
con la consiguiente confu- 
sión que esto produciría. 

Por último, cabe decir que 
las condiciones impuestas 
en el programa para que un 
choque se verifique son ab- 
solutamente arbitrarias, es 
decir, pueden variarse a 
gusto del consumidor y no 
existe ningún impedimento 
para hacerles los retoques 
necesario hasta conseguir 
que se adapten a nuestras 
pretensiones. 

Se puede afirmar que el 
mejor aprendizaje es, sin 
duda, la práctica y las expe- 
riencias personales. Confío 
en que este artículo haya 
contribuido en algún modo 
a ello. 




LISTADO 2 

DUMP: 40.000 N.° BYTES: 420 



DATOS 



CONTROL 



CD9E9CCDBE9C3ErB0BFE 1856 
CB4 7CC769C3EFBDBFECB 174 1 
4FCC8B9C3EFBDBFECB67 1670 
CC249D3C7FDBFECB4FCR 1543 
D19DFB76F3CD649DCD3B 1704 
9DC3R09DCB4FC83R9F9C 1524 
FE97C8CD9E9C3R9F9C3C 1557 
329F9C 1813CB47C83R9F 1099 
9CFE17C8CD9E9C3R9F9C 1525 
3D329F9C06400E081150 615 
C33E 10F5C53EBFCDRC22 1379 
06031RRE77231310F9C1 840 
05F13D20ERC906950EE8 1175 
1180C33E10F5C53EBFCO 1318 
RC2206021RRE77231310 603 
F9C 105F 13O20ERC90628 1262 
0E20C521E19D11R0C306 1036 
021R77132336002310F7 553 
79E6072S0E4721E 19O0E 912 
04CB1E230D20FR10F3C 1 1019 
11E19D3E02F5C53EBFCD 1363 
«C2206O21ORE7-231310 603 



23 F9C105F13O2OERC93RE0 1498 

24 9DFE00C03E0132E09D3R 1155 

25 9F9CD60232DF9CCDDE9C 1543 

26 C93RE09DFE0OC83RE19C 1533 

27 FEF0300FCDDE9C3RE19C 1579 
Í8 C604 32E 19CCDDE9CC9CD 1622 

29 DE9C3E2032E19CRF32E0 1352 

30 9DC93PDF9DFE00201B3R 1167 

31 BF9CFE96300EF5CDBE9C 1609 

32 F1C60332BF9CCDBE9CC9 1591 

33 3E0132DF9DC93RBF9CFE 1353 

34 1R360EF5CDBE9CF 10603 1350 

35 32BF9CCDBE9CC9RF32DF 1597 

36 9DC93RE09OFE0028353R 1202 

37 C19C473RE19C98382BFE 1364 

38 0C30273RBF9C473RDF9C 1012 

39 983806FE023019180C3R 637 

10 DF9C473RBF9C98FE0F30 1324 

11 0BRF32E09D3E2032E19C 1142 
t2 FBC9C3469C0PP0FC00FC 1377 

LISTADO 3 

DUMP: 50.000 N.° BYTES: 82 



LÍNEA DATOS CONTRO 

1 07FC02D803FF63F00144 1143 

2 10014413FF43F0088003 805 

3 F0940400R9F800RB0800 988 

4 RRC800RR1000RBE000BR 1137 

5 00008200007C000003C0 449 

6 03C003CO03C003C003C0 975 

7 FFFFFFFFFFFFFFFF03C0 2235 

8 03C003C003C003C003C0 

9 FCFC0000000000000000 



LISTADO ENSAMBLADOR 



II 


006 41119 




21 


CALI REVOL ¡Pnaera 


mpresion o>l revolver 


31 


CAU CRUZ ;T li en 


z, con wir 1 


41 PRINC 


10 A.IFB ¡Chequea 


la teda 0 


51 


]N A,(»FE< 




¿» 


BIT 8,A ¡Esta puh 


a da'' 


71 


CALL 2, ARRIBA (ti 1 


o esta, nueve arriba 


69 


L? A.IFP. ¡Chequea 


la tfda U 


«I 


1N A.(IFE) 




III 


BIT l,A ¡Esta tul* 


aoV 


III 


CALI : .ABAJO ¡Si lo 


esta, nueve abaje 


121 


LO A.IFB ¡Chequea 


la 'eda T 


131 


IN A.*»FE> 




144 


BIT 4.A ¡Esta pulí 


ada 1 


151 


CALL 2.DISP ¡Si lo 


esta, dispara 


ÍM 


LO A,l7F ¡Chequea 


Smbol Shilt 


171 


1N A,(»FE- 




IM 


BIT I.A ¡Esta pul; 


ada"> 


191 


jp :, CHOQUE ¡Si 1 


o ista. ritorna al Basic 


m 


El ¡Sincroniza co 


i 


21» 


HALT ¡ti barrido 




229 


01 ;o> la pantall 


• 


231 


CALL MCRU2 ¡Nueve 1 


a cruz y 


241 


CALL MOISP ¡el Oís» 


aro, si H Na producido 


231 


JP COMPR ¡Salta a 


comprobación de choque 


M ARRIBA MI 1,A ;E;ta pulí 


ada la W> 


271 


RET l ¡Retorna ti 


lo ista 


m 


LO A.íVARl' (ll o 


rdtritda del revolver 


2'8 


CP 197 ;Ha alean; 


ado fl 1 iBitl superior' 


ü 


RET : flt C«M M*¡ 


rnativo. retorna 


319 


CALL REVOL ¡Borra ( 


■gura anterior 


329 


LO A, (MARI 1 ;!ncr 


menta en uno 


339 


INC A ; la ordenada 


y U 


349 


LO í'JWil > ,A im\ 


vi i introducir 


351 


jp revol tim'm 


la ♦iqwra in li nuiva pos>c 


m m 


BIT »,A iCstl pul! 


ada la 0 


371 


RET 2 ¡Retorna si 


° ¿ 


28» 


LO A,(VARI • ¡La o 


rdtnada dfl revolver 


3<9 


CP 117 ¡Ha ilcaai 


ado il Imiti mfirior 1 


49» 


RET 2 ;En USO »<i 


rnat i «o. retorna 


41» 


CALL REVOL ¡Borra 1 




428 


LO A,<UAR1> ¡Tona 




43» 


DEC A ¡para ÉKTM 




44» 


LO 'UARI'.A || vo 


"dt/r v Iv f * 


45» REVOL LO B.94I ¡Ordenad 


l di rivo ver 


469 


LO C.II8 ¡Abscisa 




471 


LO 0E.IC35I :0.re 


ccion dil grafito d>' revo 


481 


LO A. 11» |Nwr; 


de scans virticalis 


4»« IMPRIM PUSH AF 




5*1 


F-USH BC ¡Suarda coo 


r diñadas 


511 


LO A.IBF ¡Calcula 


la dirección 


521 


CALL P1XEL ¡del f.c 


hiro di pantalla 


531 


LO B,tl3 |l inpri 


ne 


548 INPI 


LO A,(0E> ¡aezcla 


ndo los 


551 


'CP íHL> ¡datos di 


1 gráfico con 


541 


LO (NI), A ¡lo que 


haya tn paatalla 


571 


INC HL 




SM 


INC OE 




5*1 


DJN2 IHPt 




¿19 


POP BC ¡Recupera c 


oordinadas y 


¿19 


OEC B ¡decreeinta 


la ordinada 


¿21 


POP AF ¡hasta corap 


litar la figura 


¿31 


OEC A 





JR N2.1MPR1M 
RET 



¿41 CRU2 
¿71 

m 

m 

711 
721 
73» 
74» 

75» 12 

7¿l 

778 

788 

7*1 

811 



821 
831 
841 
891 
8¿l 

871 I0IS 

881 

89» 

911 

911 

«21 

93» HETE 

941 

»5I 

9¿9 

979 



LO B.149 ¡Ordinad 

LO C.9E8 ¡Abscisa 

10 0E.8C38» lliri 

LO A, 919 ¡Nuniro 

PUSH AF 

PUSH BC ¡Suarda coo 

LO A.lBF ¡calcula 

CALL P1XEL ¡dil tic 

LO 8,112 

LO A.<DE> (I <aor 

XOR (HL) ¡dil msn 

LO (HU.A :1a sub 

INC HL 

INC OE 

0JN2 12 

POP BC ¡Ricupira c 

OEC B ¡decrenenta 

POP AF ¡Amainar 

OEC A 

JR N2.IKPR1 
RET 

LO 6,128 ¡Ordinad 

LO C.I29 ¡Abscisa 

PUSH BC ¡Suarda coo 

LO HL.BUFER 

LO 0E.IC3A» ;D.re 

LO B.II2 

LD A,(0E> ¡Nete 1 

LO (HLi.A ¡el buf 

INC OE ¡un ciro di 

INC HL ¡lima a ti 



iroti 



98» 

991 
lili 
lili 
1121 
1131 

1141 ROI 
1151 

1848 R02 

1171 

1184 

1191 

lili 

lili SI6UE 

1121 

1131 

ii4i moi 

1151 
11¿I 
1171 
1181 

1191 ESCR 

1211 

1211 

1221 

1231 

1241 

1251 

124! 

1271 

1281 

1291 



INC HL ;no fuese u 

0JN2 HETE múltiplo 

LO A.C 

AND 117 |8i lo is, 

JR 2, SIGUE ¡hacer 

LD B,A 

LD HL.BUFER 

LD C.II4 

RR (HJ ¡Rota los 

INC HL ;bu<er para 

OEC C ¡posterior i 

JR N2.R07 

ojn: roí 

POP BC ¡recupera c 

LO OE.BUFER ;r lo 

LO A, 112 ¡Noiero 

PUSH AF 

PUSH BC 

LO A.IBF 

CALL P1XEL 

LO B.II2 

LD A, (DE I ¡Inprm 

XOR (HL) ¡del disp 

LD <HL),A ¡el con 

INC HL ¡bufer con 

INC DE ¡haya en pa 

0JN2 ESCR 

POP BC 

OEC 8 

POP AF 

DEC A 

JR NZ.INOI 



ccion del orifico 0> U cr« 
di scans virt reales 

rdenadas 
la dirección 
hero de pantalla 



oordenadas r 
la ordenada hasta 

la mpresion 



a del disparo 
rdenadas 

ccion del gráfico del disparo 

os datos en 
ir e introduce 
spues de cada 
n de poder 
ríos si la abscisa 
n nuaero 
de ocho 



sigue sin 
ninguna operaoc 



oordenadas 
inpnne 

de scans verticales 



e el gráfico 
aro nezdando 
tenido del 
lo que 
«tilla 



DETECCIÓN DE CHOQUES 



55 



1311 


RET 




1311 DISP 


LD A,(1DEN> ¡Hay 


/a «n disparo efectuado 7 


1321 


CP III ;En caso a 


f imativo 


1338 


RET H2 ¡retorna 




1341 


LO A, Mi ¡Ahora s 


i ha d» haberlo 


1331 


LO < I084>,A ¡y lo 


hace constar 


1341 


LO A, (VARI) ¡Toma 


la ordenada del revolver 


1371 


SUS 112 ¡para o>cr 


ementarla en dos e 


1381 


LO (VAR31.A ; mtr 


oduorla en la del disparo 




CAIL 101S ¡Imprime 


su gráfico y 


'! ! 


RET ¡retorna 




1411 M[i]$r 


LD A,<IDEN) ¡Hay 


un disparo 


1421 


CP MI ¡en pantal 






REI 2 ¡Retorna si 


n 1 h 
no o ay 




LU H.lvNMJ ,3U a 


ososa na alcanzado 




CP IFI ;el valor 




14 1 


id ur anona ifiJ • 


s asi , res ab ece parame r 


! fli 


TAI 1 TMC .Ba*»i 1 a 

w*.l mis .porra la 


figura anterior 




LO A,(VAR4) ¡mcr 


e"*nta Jj¡ 


1491 


ADO A, 114 ¡abscisa 




1511 


LO <VAR4),A ¡unid 


adeV" ' 


1511 


CALI ID1S |la impn 


me en la nueva posición 


1521 


RET ¡y retorna 




1931 


CALI 101S ¡Borra gr 


«4 ico del disparo 


1541 


LO A, 121 ¡restavr 


a su abscisa 


1551 


LO 'VAR4),A ;e ¡n 


dica que ya 


1541 


XOR A ¡puede produ 


cirs* 


1571 


LD (I0EN),A ¡un n 


uevo disparo 


1581 


RET 




i5»i ma 


LD A,(DIR£C) ;Si 


el indicador de sentido 


\m 


CP III ¡es un n« 


ero distinto de 1 


un 


JR NZ.A6A ¡la cru 


2 se mueve hacia abajo 


U2I 


LO A,<:VAR2> ;Si s 


u ordenada ha alcanzado el 




1431 


CP 


894 ¡li»ite aa 


un», es preciso 


1441 


JR 


NC.FINO ¡cambi 


ar el sentido 


1451 


PUS 


AF ¡Guarda ord 


enada 


1441 


CALL CRU2 ¡borra la 


figura actual 


1471 


: >- 


Af ¡recupera o 


rdenada 


1488 


ac: 


a, 183 |la ¡acr 


enenta en tres 


1691 


LO 


(VAR2\A ¡impr 


m la cruz 


1711 


CALL CRUZ ¡en su no 


eva posición y 


1711 


■r 


¡retorna 




1721 FINO 


J 


A,l ¡Indica gu 


e la crui 


1738 


U 


(M RÍO, A ¡se 


mueve hacia abajo 


1741 


RET 






1751 ABA 


LO 


A,(VAR2> ¡La o 


rdenada de la cru 


1741 


CP 


IIA ¡ha alean: 


ado el limite interior'' 


1778 


JR 


C.F1ND2 ¡S. es 


asi, cambia su sentido 


1788 


PUSH AF ;6uarda la 


ordenada, 


1798 


CALL CRU? ¡Borra ll 


anterior figura 


1811 


w 


AF ¡recupera o 


'de nada 


1818 


SU 


113 ¡la decrem 


enta en 


1821 


10 


<VAR2'.A ¡tres 


unidades 


1838 


CALL CRU? ¡la inpn 


me de nuevo y 


1841 


■r 


¡retorna 




1851 F1N02 


M 


A ¡Ahora la Cf 


si Na de 


1848 


Ll 


<D1REC>,A ¡nov 


•ral hacia arriba 


1878 


■ r 






:-.zi •:L-fPL"!* :e :hc%e« 




.. - h;; 


Ll 


A.'IDBO ¡Hay 


un disparo 


19|| 


CP 


III ¡en pantal 


1»? 


1918 


JR 


2. VUELVE ¡Si n 


o lo hay retorna 


1928 


Ll 


A,<VAR5> ¡Rest 


a a la abscisa 


1938 


Ll 


B,A ¡del dispa 


ro 


1948 


LO 


A,(VAR4) ¡la d 


e la crui 


1958 




A,B ¡si el res 


ultado r>o f« un nuMro positivo 


1948 




C. VUELVE ¡reto 


rna 


1978 


CP 


IIC ¡Si lo es. 


ha de ser meno<- de doce 


l'8l 


JR 


NC .VUELVE ¡En 


caso contrario retorna 


1998 


to 


A, VAR2) ¡Rest 


a a la ordenada 


2111 


LO 


8,A ¡del dispa 


ro 


2811 


ID 


A,(VAR3> ¡la d 


e la cru2 


2121 


SBC 


A,6 ¡Si el res 


ultado no es positivo 


2831 


JR 


C.N0 ¡salta a 


la «ubrutma No 


2141 




•12 |li es pos 


itivo, pero mayor de dos 


2151 


JR 


NC,VUELVE ¡reí 


orna 


2168 


JR 


CHOQUE |»i es 


menor, se detecta un choque 


2871 NO 


10 


A,*VAR3> ¡Rest 


a a la ordenada 


2181 


LO 


8,A ¡de la cr« 


I 


2891 


10 


A,(VM2) ¡la d 


el disparo 


2111 


SBC 


A.8 ;si el res 


ultado es 


2111 


CP 


IIF ¡aenor de 


quince, se detecta un cnoq N 


2121 


■ 


«.VUELVE ;s 


es mayor retorna 


na mm 


m 


A ¡Restaura el 


byle 


2141 


LO 


UOEN'.A ¡.den 


titicador del 


2158 


10 


A,I2I ¡disparo 


. repone el valor 


21 ¿I 


LO 


<VAR4),A |i|ic 


i al de su abscisa 


2178 


El 


¡habilita las 


interrupciones 


2181 


m 


¡y retorna al 


Basic 


2198 VUELVE 


» 


PRIMC ¡Regresa 


al bucle principal 


2211 DIREC 


DEF6 II 




2211 10EN 


DEFB II 




2221 BUFER 


KFI 


14 




2238 PIXEt 


EM 


8874 




2241 VARI 


EGi> 


41195 




2251 VAR2 


EN 


41127 




2241 VAR3 


m 


41159 




2278 VAR4 


m 


41161 




2281 VAR5 


m 


4112» 






Tel. (91)275 96 16-274 75 02 

„c GRATIS A ELEGIR 



PTAS. 

FIST II 875 

DEEP STRIKE 875 

SUPERSOCCER 875 

TERRA CREST 875 

DOUBLE TAKE 875 

SHORT CIRCUIT 875 

ARKANOID 875 

UCHI MATA 875 

INSPECTOR GADGET 875 

SHAO LIN'S ROAD 1.750 

SOFTAWARE AMSTRAD DISCO 2.250 



PTAS. 

XEVIUS 875 

lOth FRAME 1.200 

LEADERBOARD 1.200 

EXPRESS RAIDER 875 

ACE OF ACES 1.200 

IMPOSSABALL 875 

SIGMA 7 875 

BAZZOKA BILL 875 

DRAGON'S LAIR II 875 

SHADOW SKIMMER 875 

(Incluido regalo calculadora) 



SPECTRUM PLUS + 
CASCOS MÚSICA STEREO 
19.800 PTS (ind. IVA). 

OFWlASjOyS» 

PTAS.l 
9951 

IqüICK SHOT \ u95 

QUICK SHOT I ,— . 2.695 
QU1CK SHOT « TURBO jjg' 
QUICK SHOTIX^ 
KONIX ^icroswitc^ 
, N TERFAtEjPECTRUNL 



IMPRESORAS 20% DTO. SOBRE P.V.P. 




CABLES E INTERFACES 
20% DTO. SOBRE RV.R 

CADENA MUSICAL 27.900 PTS. 
VIDEO VHS AKAI 79.900 PTS. 
RADIOCASSETTE STEREO 6.895 PTS, 



RATÓN PARA AMSTRAD Y COMMODORE CON SOFTWARE 4.900 PTS, 

PEDIOOS CONTRA REEMBOLSO SIN GASTOS 
DE ENVlO (si es inferior a 1 200 ptas. se cargarán 

150 ptas). LLAMA POR TELEFONO. ADELANTAS TRES DÍAS TU PEDIDO TELF. (91) 274 75 02 / 

(91) 275 96 16 

(Durante tas 24 horas) 

SERVICIO TÉCNICO REPARACIÓN TARIFA FIJA: 3.600 PTAS. 
(incluido provincias sin gastos envío) 



Stas» ■■■■ a , 



CASSETTE ESPECIAL ORDENADOR 3.495 PTAS. Y 3.995 PTAS. 
COMPATIBLE PC IBM 640 K 
2 BOCAS 380 K 
MONITOR FÓSFORO VERDE 
149.900 PTAS. (¡nclido IVA) 



CASSETTE ESPECIAL ORDENADOR 
3.495 PTS. Y 3.995 PTS. 

COMMODORE 128 54.900 

COMMODORE 128 + TECL MUSICAL ... 57.900 



i i PRECIOS EXCEPCIONALES RARA TU AMSTRAD!! 

Tiendas y Distribuidores, pidan lista de precios al mayor. C/. Calatea. 25 28042 MADRID teléf. (91) 274 75 03 



adentrarnos en el 
mundo de la 
programación resulta 
imprescindible 



Rafael MARQUEZ PARRA 



conocer las diferentes 
técnicas que permiten 
diseñar el mapeado 
de un juego. En estas 
páginas encontraréis 

una rutina que 
desarrolla una de 

estas técnicas. 



TECN 




Para facilitar su 
comprensión va- 
mos a guiarnos por 
un programa ejem- 
plo. Si observáis 
detenidamente cada paso, 
dentro de muy poco podréis 
diseñar fácilmente vuestros 
propios mapeados. Hemos 
elegido para ejemplificar 
nuestra rutina el mapeado 
de una casa. 

La hemos diseñado de 
forma que quepa en nueve 
pantallas del televisor. En 
cada una podrán verse dos 
pisos y tendrá tres habita- 
ciones en el plano horizon- 
tal; por tanto estará com- 
puesta por 18 lugares distin- 
tos. Para hacerlo más real, 
el último piso lo convertire- 
mos en el tejado de la casa 
y será una zona donde no 
se podrá acceder. 

Ahora hay que diseñar 
gráficos para adornar el in- 
terior. Deben ser lo más va- 
riados posible y podrán es- 
tar en más de una habita- 
ción. 



Cuando ya están dibuja- 
dos hay que almacenarlos 
en memoria. Estos gráficos 
no se almacenan como los 
GDU, sino por scanes, es 
decir, primero la primera fi- 
la de bytes de la primera li- 
nea de caracteres que com- 
ponen el gráfico, después la 
segunda tila de la primera 
linea de caracteres y así 
hasta completar todo el 
gráfico. (Fig. 1). 

Con todos los gráficos ya 
almacenados hay que cons- 
truir una tabla con las ca- 
racterísticas de cada uno. A 
esta tabla le llamaremos 
TABLA DE GRÁFICOS. 
Cada gráfico ocupa cuatro 
bytes de la tabla. El prime- 
ro indica el número de bits 
de ancho, el segundo el nú- 
mero de bits (o scanes) de 
alto, el tercero y el cuarto 
contienen la dirección don- 
de está almacenado. (Fig. 
2). 

Ahora hay que distribuir 
los objetos por las habita- 
ciones a nuestro gusto. 



Cuando ya lo hayamos he- 
cho, hemos de construir una 
tabla que nos indique qué 
gráfico hay en cada panta- 
lla. Le llamaremos TABLA 
DE PANTALLA. 

El primer byte de la tobla 
indica el número de objetos 
que hay en ella (no se cuen- 
tan las paredes, puertas, te- 
cho, suelo, escoleras ni el te- 
jado con la ventana que 
hay en él, ya que éstos reci- 
ben un tratamiento diferen- 
te). 

Después de este byte vie- 
nen cuatro más para cada 
objeto. El primero es el nú- 
mero de identificación del 
gráfico, que es la posición 
que ocupa en la TABLA DE 
GRÁFICOS. El segundo 
byte indica la posición ver- 
tical del objeto y el tercero 
la posición horizontal (estos 
valores se toman con pan- 
talla en alta resolución; 
igual que el PLOTy DRAW). 
El último byte indica el co- 
lor del gráfico y se halla de 
la siguiente manera: CO- 





S&jBSSSSS 59 

CAS DEL 



LOR DE TINTA + COLOR 
DEL PAPEL-8 BRILLO* 
64 + FLASH* 128. 

Por tanto, si en una habi- 
tación hay una mesa, una si- 
lla y una ventana, la TABLA 
DE PANTALLA tendrá una 
longitud de 13 bytes, el pri- 
mero el contador de objetos 
y cuatro para cada gráfico 
que haya. 

Ya sólo falta hacer una 
tabla, la TABLA DE DA- 
TOS. Esta tiene dos bytes 
por cada pantalla, es decir 
1 8. Estos bytes contienen la 
dirección donde comienza 
la TABLA DE PANTALLA de 
cada una de ellas. 

Ahora ya está desarrolla- 
do todo lo necesario para 
empezar a explicar las ruti- 
nas que lo realizan. 

También haremos que un 
pequeño personaje pueda 
visitar todas las habitacio- 
nes de la casa. 



EXPLICACIÓN 
DEL PROGRAMA 



Empieza en la línea 100 
con un salto a SEGUIR. En- 
tre las líneas 120 y 260 es- 
tán las etiquetas utilizadas 
por el programa. 

Entre laslíneas 280 y 700 
se encuentra la TABLA DE 
GRÁFICOS. 



Entre las líneas 720 y 00 
está la TABLA DE DATOS 
que contiene la dirección de 
comienzo de la TABLA DE 
PANTALLA de cada uno de 
ellas. 

850-870: Papel negro y 
tinta blanca. 

880-910: Se inicializan 
las coordena- 
das del muñe- 
co. 

920-930: Se pone a 0 la 
variable SAL- 
TO. Estará a 1 
si el muñeco 
tiene que sal- 
tar. 

940-950: Se inicializa a 
1 la variable 
FORMA. Pue- 
de contener un 
número del 1 
al 8. Cada uno 
corresponde a 
un gráfico dis- 
tinto del muñe- 
co. 

960-970: Se almacena 
en PANTel nú- 
mero de habi- 
taciones donde 
se encuentra el 
muñeco. Las 
habitaciones se 
numeran de iz- 
quierda a de- 
recha y de arri- 
ba a bajo em- 
pezando por 
1. 
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NUMERO 


NUMERO 


DIRECCION 


DE 


SCRNNS 


BYTES 


DE 


DEL 


ANCHO 


RLTO 


GRRFICO 


1 BYTE 


2 BYTE 


3 Y 4 BYTE 



TÉCNICAS m m 
DEL MAPEADO O I 




DATOS FIG. 1 



,0,0,0,0,0,0,0,0,0,28,0, 0,62,0, 
0, 127,0,0, 127,0,0,85,0,0, 127,0,0 
, 109,0,0, 127,0,0, 127,0,0,62,0, 1, 
221 , 128 ,5 ,227 ,224. , 13 ,247, 176 , 13 , 
235 , 184 , 14- , 255 , 184 , 31 , 255 , 124 ,31 
,255,252,63,255,254 ,61 ,255,222, 1 
24 , 85 , 206 , 124 , 255 , 142 , 120 , 255 , 20 

6 , 249 , 255 , 197 , 209 , 255 , 231 , 224 , 12 

7 , 143 ,113, 140 , 1 10 , 1 13 , 243 , 224 , 33 
,243.224 , 1 ,243,224 , 1 ,243,224 ,1,2 
43 , 224 , 3 ,243 ,240 , 3 , 243 , 240 , 3 , 243 
, 240 , 2 , 225 , 208 , 3 , 33 , 48 , 2 , 161 , 80 , 
3,97,48,2, 192,208.3,64. 176,2, 192 
, 208 ,5 ,64 , 168 , 10 , i 92 , 2 12 , 2 i , Í28 , 
106, 14,0,28, 192 



; 990-1020: CLS y borde 
azul. Se mar- 
ca la variable 
MODO a 1. 
Si tuviera un 
0, la rutina 
de impresión 
no imprimi- 
ría. 

Entre las lineas 1030 y 
2730 se imprimen las figu- 
ras correspondientes a cada 
pantalla que no sean obje- 
tos, como paredes, puertas, 
etc. Para imprimirlos se car- 
ga en DE la dirección que 
ocupo el gráfico en la TA- 
BLA DE GRÁFICOS y en HL 
el comienzo de los datos 
que contienen las coordena- 
das y el color del gráfico a 
imprimir. 

Después se llama a SITUA 
que introduce los valores en 
las etiquetas para que pue- 
da utilizarlos la rutina de im- 
presión e imprime el gráfi- 
co. 

1030-1050: Se imprime 
un gráfico 
del suelo. 



1060-1130: Se crea un 
bucle para 
que impri- 
ma 8 gráfi- 
cos horizon- 
talmente. 
Entre 1100 
y 1120 se 
incrementa 
la coorde- 
nado. 

1 140-1 1 70: Se imprime 
el gráfico 
del techo y 
se llama a 
SUBI. 

1180-1210: Se cambia 
la coorde 
nada Y pa- 
ra imprimir 
en la parte 
superior de 
la pantalla 
otro gráfico 
del techo. 
Llama a 
SUBI y salta 
CONT1. 

1220-1300: Se crea un 
bucle para 
imprimir 8 



gráficos del 
techo. 

1310-1370 Si el muñeco 
está en las 
pantallas 3, 
6 ó 9 salta o 
MUR02. 
1380-1400: Se imprime 
una pared 
en el piso 
bajo de la 
pantalla. 
1410 -1430: Se imprime 
una puerta 
en el piso 
bajo. 

1440 -1460: Se comprue- 
ba si se está 
en las dos 
primeras 
pantallas 
y si es asi 
se salta a 
CONT2. 

1470-1490: Imprime 
una puerta 
en el piso 
alto de la 
pantalla. 

1500-1530: Imprime 
una pared 
en el piso 
alto y salta 
a CONT2. 

1540-1560: Aquí se lle- 
ga si está en 
la pantalla 
3, 6 ó 9. 
Se imprime 
un muro. 

1570-1590: Si estamos 
en la panta- 
lla 3 salta a 
TRES. 

1600-1750: Imprime 
dos puertas, 
dos paredes 
y un mu- 
ro. Salta a 
CONT2. 
Imprime un 
muro. 

Si estamos 
en la panta- 
lla 1, 4 ó 
7 salta a 
MUR. 

Se imprime 
una pared y 
una puerta. 
: Si estamos 



1760-1780 
1790-1850 



1860-1910 
1920-1940 



en la panta- 
lla 1 ó 2 sal- 
ta a MUR. 

1950-2010: Imprime 
una pared, 
una puerta 
y salta a TE- 
JADO. 

2020-2040: Si estamos 
en la panta- 
lla 2 salta a 
TEJADO. 



2050-2130: 



2140-2160: 



2170-2250: 



2260-2280: 



2290-2310: 
2320-2460: 



2470-2490: 
2500-2550 



2560-2580: 
2590-2640: 



2650-2670: 



Imprime 
una pared, 
un muro y 
una puerta. 
Si estamos 
en la prime- 
ra pantalla 
salta a TE- 
JADO. 
Imprime 
una pared, 
una puerta 
y un muro. 
Si no esta- 
mos en las 3 
primeras pan- 
tallas salta a 
CONT3. 
Imprime el 
gráfico del 
tejado. 
Crea un bu- 
cle para im- 
primir cinco 
filas de grá- 
ficos que for- 
man el teja- 
do. 

Imprime la 
ventana del 
tejado. 
Si estamos 
en la pan- 
tolla 4 ó 7 
salta a ESC, 
sino a 
CONT4. 
I mprime 
una escole- 
ra. 

Si estamos 
en la panta- 
lla 6 ó 9 va 
a ESCB, sino 
a CONT5. 
Imprime 
una escale- 



2680-2730: Si estamos 
en la panta- 
lla 7 impri- 
me un mu- 
ro. 

En SIG comienza la rutina 
que lee los datos de las pan- 
tallas y crea las habitacio- 
nes. 

2760: Se carga en A el 
número de panta- 
lla donde está el 
muñeco. 

2770: Se carga en B pa- 
ra hacer un bucle. 

2780-2810: Se calcula la 

Eosición de 
3 pantalla 
en la TABLA 
DE DATOS. 
2820-2860: Se pasa la 
dirección de 
la TABLA 
DE DATOS 
de la panta- 
lla donde 
está el regis- 
tro HL. 
2870-2880: Cargo en B 
el número 
de gráficos 
a imprimir. 
2890 : Se guarda el regis- 
tro B para no per- 
der su contenido. 
2900-2930: Se carga en 
B el número 
de identifi- 
cación del 
primer grá- 
fico. 

2940-2990: Halla la po- 
sición de los 
datos del 
gráfico a 
imprimir en 
la tabla de 
gráficos. 

3000: Imprime el gráfi- 
co. 

3010: Recupera el con- 
tador y repite si 
aún faltan más. 

3030-3060: La panto 
Ha ya está 
completa y 
se almace- 
na en me- 
moria. 

3070: Salta a SEGU2. 

3090-3330: Esta rutina 



coloca los 
datos de los 
gráficos en 
las etiquetas 
para que 
pueda utili- 
zarlos la ru- 
tina de im- 
presión. 
Carga la anchura del grá- 
fico en ANCHO, la altura 
en ALTO; el byte bajo de la 
dirección donde está alma- 
cenado en INFER y el alto 
en SUPER; la coordenada Y 
en POSY, la X en POSX y los 
atributos en COLOR. Luego 
llama a IMPRI que dibuja el 
gráfico y retorna. Los datos 
que hay entre las líneas 
3360 y 3610 sirven para 
imprimir las puertas, pare- 
des, etc. El primer byte es la 
posición Y, el segundo la X 
y el tercero el color del grá- 
fico. Los datos que hay en- 
tre las lineas 3630 y 3700 
indican la dirección donde 
están almacenadas las figu- 
ras para crear el movimien- 
to del muñeco. 

Las primeras 4 son del 
movimiento a la derecha y 
las 4 últimas a la izquierda. 
La figura 1 y 3 de cada sen- 
tido son iguales. 
3720 -3800: Pone los da- 
tos iniciales 
del muñe- 
co. Llama a 
BFORM que 
busca la for- 
ma que le 
correspon- 
de. Después 
se llama a 
PCOOR que 
coloca las 
coordena- 
das del mu- 
ñeco para 
que pueda 
utilizarlas la 
rutina de 
impresión, y 

Eor último 
j imprime. 
3830-3860: Si se ha pul- 
sado la tecla 
Z se salta a 
PULIZ. 




LISTADO 2 

(RUTINAS) 



1 C311C4101840D7101871 

2 D71018R2D70820D3D72© 

3 2er4.D7iei875oeieieoE 

4 D82008CFD8102010D920 

5 18510918109209281803 
8 O920083CDR0820SDDR18 

7 107EDR1810RFOR1810E0 

8 DR101811DB101842DB20 

9 1073DB1810B4DB2020E5 

10 DB182066DC1010C7DC10 

11 18E8DC101B19DD18184R 

12 DD101893DD2010C4DD10 

13 1805DE181836OE28187F 

14 OE1018F8DE201029DF20 

15 186RDF1010CBDF1018EC 
18 OF10181DE000204EE020 

17 206FE01818F0E0101839 

18 E110186RE1CCRFDDRFF2 

19 RF07B028B059B07EB097 

20 B0C0B03E02CD01163E07 

21 328DSC32485C3E503292 

22 E23E7F3291E2PF3294E2 

23 3C3293E23E083290E2CD 

24 6B0O3E01D3FE3206SB21 

25 9BC61177C3CD2DC60608 

26 C5CD00FRC13R045BC620 

27 32045B10F1219EC6116F 
26 C3CD2DC6CD6FC43ERF32 

29 0556CD6FC418120608C5 

30 CD00FRC13R04SBC62032 

31 045810F1C93R90E2FE03 

32 2835FE062831FE09282D 

33 2156C61187C3CD2DC621 

34 S9C611EBC3CD2DC63P90 

35 E2FE03365C215CC611EB 

36 C3C02DC6215FC61187C3 

37 C020C616462189C61173 

38 C3CD2DC63R90E2FE0328 

39 2F218CC611EBC3CD2DC6 

40 2156C61187C3C02DC621 

41 92C611EBC3C020C62195 

42 C61187C3CD2DC6218FC6 

43 1173C3CD2OC616092198 

44 C61173C3CD2DC63R90E2 

45 FE012835FE042831FE07 

46 262D2162C61187C3CD20 

47 C62166C6115FC3CD2DC6 

48 3R90E2FE0336142165C6 

49 1167C3C02DC62168C611 

50 5FC3CD2DC618443R90E2 

51 FE02283D217RC61173C3 

52 CD2DC6217DC61187C3CD 

53 2DC62180C6115FC3CO2O 

54 C63R90E2FE01281B2165 

55 C61187C3C02DC62183C6 

56 115FC3CD2DC62186C611 

57 73C3CD2DC63R90E2FE04 

58 303111D7C32177C6CD2D 

59 C60605C50608CSCD00FR 

60 C13R045BC62032045B10 

61 F13R055BD610320SS8C1 

62 10E32174C611CBC3CD2O 

63 C63R90E2FE042806FE07 

64 28021809216EC611EFC3 

65 CD2DC63R90E2FC062806 

66 FE09280210092171C611 

67 63C3CD2DC63P90E2FE07 
66 200921R1C61173C3CO2O 

69 C63R90E24711FOC31313 

70 10FC1R6F131O677E47C5 

71 237E2347114FC3131313 

72 1310FRCD2DC6C110EC21 

73 004011B88801001BEDB0 

74 C3B4C6F31R32075B131R 

75 32085B131R320R5B131R 



880 

1130 

1102 

1024 

976 

910 

1057 

851 

1082 

1064 

884 

1110 

766 

1076 

1067 

890 

976 

1613 

1292 

905 

851 

1435 

1178 

828 

1146 

1228 

919 

1442 

861 

1081 

1238 

790 

1145 

1384 

1206 

1316 

1044 

1368 

1313 

1145 

1421 

1367 

993 

1401 

956 

1011 

1288 

1093 

1150 

1258 

1037 

1356 

1159 

1082 

1355 

1137 

1444 

1124 

1072 

737 

964 

1255 

1191 

867 

1182 

699 

1431 

1010 

1200 

947 

615 

1211 

842 

1035 

390 



TECNICAS #o 
DEL MAPEADO OO 



DUMP: 50000 
N.° BYTES: 1.472 



76 320B5B7E32055B237E32 

77 04S6237E32095BE5CO00 

78 FRE1FBC95FF8063FF844 

79 87F844R7F8065F0006R7 

80 00063F0044.6700446710 

81 433FD043977802RF0002 

82 5F00163F00063F0844R7 

83 08448700163FF0165FF0 

84 44R7F01687FO4487F806 

85 SFF0161FO0166700283F 

86 001640D771O740D7R2D7 

87 6RE 1ECDF6RE 1 1DE03E 10 
66 32075B3E183208SB3E0 7 

89 32095BCDE0C7CDF5C7CO 

90 00FR3EFEDBFECB4F2824 

91 3EFEDBFECB5728703E7F 

92 DBFECB47CCR0C73EBFDB 

93 FECB47C83R94E2B7C2RF 

94 C7CC1EC818D43R92E23D 

95 4F3R91E2061747C5CDRR 

96 22CO05C8C11RFE44CR80 

97 C8FE1628C7FE432009CD 
96 CE22CDO52DB720BR3R93 
99 E23CFEO9D4DRC7FE05OC 

100 DRC73293E2C0E0C73R92 

101 E2D6O23292E2CD10C8CO 

102 F5C7010500CD3D1F1890 

103 3R92E2C6104F3R91E2D6 

104 1747C5CDRR22CD05C8C1 

105 1RFE44CRCCC8FE 16CRDC 

106 C6FE43200RCDCE22CDD5 

107 2DB7C20CC63R93E23CFE 

108 0536023E013293E2CDE0 

109 C73R92E2C6023292E2CD 

110 10C6CDF5C7010500CD3D 

111 1FC3DCC63R94E2B7C03C 

112 3294E23E053295E2C93R 

113 95E23O3295E2B7200932 

114 94E2CD1EC8C3CCC63R91 

115 E2C6023291E2CD10C8CD 

116 F5C7010500CD3D1FC3CC 

117 C6C93E053293E2C93R93 
116 E221R2C647232310FC7E 

119 320R5B237E320B5BC93R 

120 92E232045B3R91E23205 

121 5BCDO0FRC97C0F0F0FE6 

122 03F658575DC9F321B888 

123 11004001001BEDB0FBC9 

124 3R92E24F3R91E2D61847 

125 C5CDRR22CD05C8C 1 1RFE 

126 26C8FE16C8FE43200eCD 

127 CE22COO52DB7C03R92E2 

128 C60F4F3R91E2D61847CS 

129 CORR22CO05C6C11RFE28 

130 C8FE16C8FE432008CDCE 

131 22CDD52DB7C03R91E2D6 

132 023291E2CD10C8CDF5C7 

133 010500CD3D1F189E3R90 
13* E2FE012814FE042810FE 

135 07280C3D3290E23EE832 

136 92E2C335C43R91E2FE5F 

137 38153R90E2D6033290E2 

138 3E373291E23E123292E2 

139 C33SC43R90E2C6033290 

140 E23E123292E23E9F3291 

141 E2C335C43R90E2FE062O 

142 10FE09280C3C3290E23E 

143 0R3292E2C335C43R91E2 

144 FE5F38133E573291E23E 

145 DE3292E2CD10C6CDF5C7 

146 C3CCC63E7F3291E23EDE 

147 3292E2CD10C8CDF5C7C3 

148 CCC60000000000000000 



635 

640 

1655 

1140 

491 

855 

492 

893 

1329 

616 

1285 

1452 

452 

1632 

1397 

1420 

1782 

1712 

1360 

1388 

1315 

1282 

1309 

1657 

1672 

1490 

915 

1366 

1303 

1652 

1424 

1585 

978 

1456 

1137 

1511 

1175 

1135 

1609 

1473 

1146 

1295 

1154 

723 

1001 

1146 

1314 

974 

1247 

1489 

1282 

1508 

1227 

1332 

1448 

1515 

1493 

687 

1109 

884 

1594 

1142 

1040 

1267 

1144 

1398 

873 

1305 

1056 

1714 

1491 

1687 

402 



3870-3900: Sise ha pul- 
sado la X se 
salta a PUL- 
DE. 

3910-3940: Si se ha pul- 
sado Space 
se llama a 
PSALT. 
3950 -3980: Si se ha pul- 
sado ENTER 
vuelve al 
BASIC. 
3990: Carga en A el va- 
lor de SALTO. 
4000-4010: Si no es 0 
es que el 
muñeco ha 
de estar su- 
biendo por- 
que se ha 
pulsado la 
tecla de sal- 
to y pasa a 
SUBIR. 
4020: Si es 0 hay que 
comprobar si tiene 
que bajar porque 
no hay suelo de- 
bajo suyo, y se ha- 
ce una llamada a 
BAJAR. 
4030: Cierra el bucle so- 
bre TECLAS. 
PULIZ. Aqui se llega si se 
ha pulsado para mover a la 
izquierda. 
4060-4120: Se sacan las 
coordena- 
das del mu- 
ñeco y se 
actualizan 
para com- 

K robar qué 
ay a su iz- 
quierda. Se 
guardan las 
nuevas 
coordena- 
das en BC y 
éste en la 
pila. 

4130: Se llama a una ru- 
tina de la ROM. 
Esta rutina necesi- 
ta las coordena- 
das en el registro 
BC y a la salida da 
en HL la dirección 
del punto que se- 
ñalan las coorde- 
nadas. 



LÍNEA 



CONTROL 



mi 



607 
669 
714 
431 

536 

1165 
1383 



281 70035|D|® O | • ^ 1 pee 

1ÍB» 



4140: Se llama a BA- 
TRIB. Esta rutina 
necesita tener en 
HL una dirección 
del archivo de 
pantalla y a la sa- 
lido devuelve la di- 
rección de atribu- 
tos en el registro 
DE de la posición 
apuntada por HL. 
4 1 60 : Carga en A el con- 
tenido de DE, es 
decir, el color del 
carácter que hay a 
la izquierda del 
muñeco. 
4170-4180: Si este valor 
es 68, es 
que hay una 
puerta. En- 
tonces se sal- 
ta a PUEIZ. 
4180-4200: Si es 22 es 
que hay un 
muro, en- 



LISTADO 4 

(GRÁFICOS) 



DUMP: 55.104 N.° BYTES: 2t 1 



ÜNEA DATOS CONTROL 

1 038007C0065EOFFF0FFE 969 

2 0F8O03EO01C0018O0180 821 

3 02C002C006E006E00660 950 

4 ©2400240O3C003600180 587 

5 018001C001E000000003 550 

6 8O07C0065E0FFF0FFE0F 981 

7 8003E001C0018001800F 821 

8 C013402767779F67E703 1032 

9 C001E00670077806180E 706 

10 180C1C0F1E0000000380 240 

11 07C0O65E0FFF0FFE0F80 981 

12 03E001C00180018003C0 873 

13 1C6027D773CF67C707C0 1201 

14 070006E006F006301C30 613 

15 181C1E1E000000F0F0F0 832 

16 F0F0F0F0F0F0F0F0F0F0 2400 

17 F0F0F3FDF 1FDF3F0F0F0 2433 

18 F0F0F0F0F0F0F0F0F000 2160 

19 000000FF000000FF0000 510 

20 00FF000000FF000000FF 765 

21 000000FF000000FF0000 510 

22 O0FFO000FFFF0000FFFF 1275 

23 0000FFFF0000FFFF0000 1020 

24 FFFF00O0FFFF0000FFFF 1530 

25 00O0FFFF00FFFFC 100FF 1468 

26 FF2BO0FFFCS500FFFRR3 1558 

27 00FFE50500FFC8RB00FF 1370 

28 D14SOOFFR2R3FFFF8541 1566 

29 FFFF22R3FFFF4 14 1FFFF 1857 

30 288BFFFF554SFFFFRRR3 1686 

31 FFFF5555FFFFFFFF0000 1700 

32 007C0O00FR00OOFD0000 627 

33 FRO00OFD000OFR0O00FD 1006 

34 00O0FROO00FD1FFEFR3F 1101 

35 FEFD3FFEFR3FFEFD3FFE 1961 

36 FR0001F01555FR2RRBFD 1326 

37 3FFFFR3FFFFD3FFFFR3F 1770 

38 FFFD0C000C1E001E1E00 622 

39 1E000000003600380036 196 

40 00380038003800180018 216 

41 0018001800181FE81FE8 598 

42 0O181FF8181818181818 447 

43 10081008100810081008 120 

44 00FFFFFFFF0000000140 1085 

45 1008050000000 10OO000 30 

46 014010080500000001FF 350 

47 FFFFFF00FFFF80018001 1533 

48 30O1800180018001FFFF 1026 

49 81013 101810181018101 650 

50 81018101FFFF3O018001 1028 

51 80018001800180018001 645 

52 FFFF8101810181O18101 1030 

53 81018K»13i«Jl810100FF 775 

54 FFFFFF00008001000080 1022 

55 01000080010000800100 259 

56 00800100008001000080 386 

57 01FFFFFFFF0080008000 1277 
56 80008000800080008000 640 

59 800060008000800O80FF 895 

60 FFFFFF00FFFFFF80180 1 1683 

61 80180180180180180180 567 

62 1801801801FFFFFFFFFF 1453 

63 FF8O18O18018O18O18O1 714 

64 801801801801801801FF 714 

65 FFFF00FFFFFFFFFFFFFF 2295 

66 FFFFFF00000000003FFF 1083 



FFFFFC3FFC003FFC3FFD 1708 

FFBFFC3FFDE3BFFC3FFD 2000 

FFBFFC 1FFDFFBFF803C4 1875 

0023C003C7FFE3C0O3C0 1298 

0003C003C00003C003C0 780 

000 -.C 00 '.L OOOO 3t 0O ÍC O '80 

o o o 3 r o o ' r o o o o < i o o 3 1 : o • e o 

0 00 u 0 0 U O O O O 0 0 >C O 730 
0003C003C00003C003C0 780 
0003C003C00003C003C0 760 
0003C000FFFFFFFFFFFF 1725 
FFFFFFFFFFFF 380000 1C 1614 
3800001C3800001C3000 216 
0O0C3OO0000C0OFFFFFF 837 
00F7F7F700FFFFFF0OEF 1745 
EFEF00FFFFFF00F7F7F7 1964 
O0FFFFFF00EFEFEFEF00 1721 
FFFFFFC00003BFFFFDB7 1842 
FFFDB1FFFDR3FDFDBBF9 2298 
F0BFF5FDBFEDFDBFEDF0 2304 
BE0009950015RR802995 857 
5555C00003FFFFFF00FF 1385 
FFFFC00003BFFFFOBF80 1723 
FDBFBEFDBF7F7DBF497D 1719 
BF7F7DBF5D7DBF637DBF 1458 
7F7DBFBEFDBF80FOBFFF 1904 
FDC00003FFFFFF00700O 1325 
00F8003CF8000C70004E 758 
70204E7OF07E70E03C71 1209 
C01823C0182360182O30 702 
18201818201818200C 18 252 
20061800040000004410 1S0 
CC19CC199C1O9C1D9C0D 997 
B80DB30F70077002E003 856 
E003C01FF800001FF800 977 
001FF61FF81FF81FF80F 1131 
F007E007E00001000060 831 
01000080010000800100 259 
00800100008001000080 386 
0 10000800 100038005C0 458 
0BR017D02FE87FF47E7C 1302 
01800180001555550020 491 
RRRREO7FFFFFF0FFE7FF 2182 
08FFDBFE08FFE 7FE04FF 1743 
FFFE0400000004F5FFPE 1191 
O4F5FFRE04F5FFREO4FS 1605 
FFRE0400000004F5FFRE 1111 
04F5FFRE04F5FFRFF800 1605 
0000180000187C00007C 296 
00187C0018380O18003E 314 
1638223C7C227EFE2260 842 
06226EF6146E06086EFE 904 
O860FE087EFE3E7C00FF 1169 
FFFFFFD5555555FFFFFF 1998 
FF04000020FBFFFFDF52 1357 
RRRR8C3000000R500000 618 
0C3 1FFFF8R5 1FFFF8C3 1 1489 
C0038R5 1BFFD8C31BFFD 1491 
8R5 1BFFD8C3 1BFFD8R5 1 1515 
BFFD8C3 1C0038R5 1FFFF 1557 
8C31FFF8BP51FFF08C31 1595 
FFFF8R5 1C0038C 3 1BFFD 1557 
8R51BFFD8C31BFFD8R51 1515 
BFFD8C 3 1BFFD8R5 1BFF D 1740 
8C31C0038R51FFFF8C31 1302 
FFFF8RF9FFFF9F00FFFF 2076 
FFFFFFFFC03403OFB5FB 1922 



134 DFBSFBDFB5FBDFBSFBDF 

135 B5FBDFB5FBDFB5FBDF85 

136 FBDFB5FBDFB5FBDFR5F8 

137 DFR5FBDFRSFBDFR5FBDF 

138 R5FBDFBSFBDFB5FBDFB5 

139 FBDFB5FBDFB5FBDFBSFB 

140 DFB5FBDFB5FBC03403FF 

141 FFFFE7FFE71800181800 

142 1818001800O7E003C001 

143 8001800180099O5999D9 

144 9BD99B099BD3CBCDB342 

145 423C3C00000000000000 

146 07E0081037E437DC0830 

147 63CE58165RDRB6DB76DR 

148 96D9EO077FFC9FF9R003 

149 B6DBB6DRB6DR36DR36D4 

150 16D016D00RO0000FF011 

151 882184418249929189R1 

152 818181FFFFFFFF8181R1 

153 91918189918589896585 

154 818381FFFF0000FFFF0O 

155 00FFFFFFFFO00FFFF01F 

156 FFF83FFFFC3FFFFC3FFF 

157 FC3FFFFC3FFFFC 1FFFF8 

158 1C003843FFC2BDFFBDBD 

159 FFBD8DFFBDBC003D5DFF 

160 BR3DFFBC3C003C30FFBC 

161 3DFFBC3DFFBC3FFFF80C 

162 00301E00781E00780000 

163 0007EO08101428124812 

164 481248124812480R500R 

165 500810042004201FF81F 

166 F800000C300C300C3008 

167 1008100610061O00FFFF 

168 FFFFFFFFFFFFC0000003 

169 DFFFFFFB0FFFF24BCFFF 

170 F24BC7FFF24BC3F0124B 

171 D1FO124BD8FFF24BDC70 

172 124BDE70124BC0000003 

173 FFFFFFFFFFFFFFFFFFFF 

174 FFFF0040024002600670 

175 0E781E3FFC1FF81FF81B 

176 D830BC5FF65FF6DFF7DF 

177 F7EE77F7EF7BDE3DBC3E 

178 7C1FF80FF003C0000000 

179 000000F60001F7B0O3F7 

180 C007F7E0OF81F0186618 

181 34242C6424S6D624181F 

182 E7F80000001000081FE7 
163 F81O2408142408142428 

184 1224C81124081O24081F 

185 FFF80000007FFFFE7FFF 

186 FE7FFFFE001C00FF0036 

187 1C03FFC038080FFFF010 

188 083FFFFC 100BFFFFFF 10 

189 170000O0E837FFFFFFEC 

190 37FFFFFFEC37FFFFFFEC 

191 37FFFFFFEC 17FFFFFFE8 

192 0O000000007FFFFFFFFE 

193 FFFFFFFFFFFFFFFFFFFF 

194 FFFFFFFFFFFFFFFFFFFF 

195 FFFFFFFFFFFFFFFFFFFF 

196 F3FFFFFFCFFFFFFFFFFF 

197 0C000000300C00000030 

198 0C0000003000018003C0 

199 03C003C007E007E00180 

200 018003C003C003C00180 



2188201 
8146101 
880010 

8i3el0( 

2216Í0Í 

■ S ■ • 

I299f0< 
198 10 
998 |1« 

186 IH 
869 ijí 
1468 l< 
18S6| \l 
1 ?39j l 
960 - ¡ 

1826|1 
1 3-4--'» 
L409&8 : 
lg61$ • 
1961?' 
1926 ^^.í 
142Í ' ■ , 
1674 |f< 
1314 §5 

348 I» 

423 |3< 

442 |3. 

486 |3' 

436 «■ 

ígfl • ; 

arfe 

L064 |4 
LB48 84 
1 .'46 |*¡ 

872 |* 
1804 I*. 
613 |* 

468 2|' 
406 • * 
1581 ' c 
1229 j g 
1068 • 
1333 gg 

i j a ... ■ 

8118 |5 
80 't ' 

8880 |S 
8880 ' 

s®m 12 

8498 gS 
128 «2 
384 26 
981 26 
643 



tonces se 
vuelve a 
VOLV. 

4210-4220: Si no es 67 
se salta a 
CONT8. Si 
es 67 es que 
hay una es- 
calera. 

4230: Se llama a la ruti- 



na POINT de la 
ROM que dice si el 
punto de las coor- 
denadas que están 
en el registro BC, 
está a uno o a 0. 
El resultado lo de- 
ja encima de la pi- 
la de la calculado- 



4240 : Se hace una llama- 
da para poner el 
valor que hay en- 
cima de la pila de 
la calculadora en 
el registro A. 

4250-4260: Si el valor 
de A es uno, 
es que ha 



chocado 
con una es- 
calera y sal- 
ta a VOLV. 
4270-4280: Aquí se lle- 
ga si no hay 
ningún obs- 
táculo. Se 
toma en A 
el valor de 



00007FFE781E7BDE7P5E 

7BDE700E700E700E700E 

700E700EFFDEDEDEDEDE 

DEDEDEDEDEDEDEDEDEDE 

DEDEDEDEDED2D2D2D2CC 

CCCCCCDEDEDEDEEDEDED 

EDEDEDEDEDEDEDEDEDED 

EDEDEDEDEDEDED2D2D2D 

2DCCCCCCCCEDEDEDED00 

FFFFFFFFFFFFFFFFFFFF 

FFFF000000003EFBEF8C 

3EF00FBC0O0FF0002F3F 

FCF42EFEFF74O1FCFF80 

3BFRFFDC3BF6FFDC03F7 

7FC02BF7BDD4 2BF7B1D4 

03B7CDC03B3BEDDC 3B5B 

DDDC036BFDC02B73FBD4 

2B77FBD4037BF7C03B87 

EFDC3BCFDFOC00 1 7D8 1 7 

O817D800003F7C3F7C00 

007BEE 7BEE0000DF7DDF 

7D0000FBEFFBEF000000 

01C003E07R60FFFO7FF0 

01F007C003800 1800 180 

03F002C8E6E4F9EEE7E6 

03C007800E6O1EE01860 

1870383078F000000001 

C003E07O60FFFO7FF001 

F 00 7C 003800 1800 18003 

C00638EBE4F3CEE3E603 

L(300Fe»O 7600F600C t «" «" 

3838187878000000eF0F 

0F0F0F0F0FOF0F0F0F0F 

0F0F0FCFBF8FBFCF0F0F 

0F0F0F0F0F0F0F0F0F0F 

00FF000000FF000000FF 

000000FF000000FF0000 

00FF000000FF000000FF 

000000FFFF0000FFFF00 

00FFFF0000FFFF0000FF 

FF0000FFFF0000FFFF00 

©0FFFF0O0083FFFF00D4 

FFFF00OR3FFF00C55FFF 

00R0R7FF00D513FFOOP2 

8BFF00CS4SFFO082P1FF 

FFC544FFFF8282FFFFD1 

14FFFFP2PPFFFFC555FF 

FFPPPPFFFFFFFFFFFF00 

3E00005F0000BFO0005F 

00008r00p0<-.r íuh>0M 

005F0000BF00005F7FF8 

BF7FFC5F7FFCBF 7FFC5F 

7FFCBF8OO05FPPP88FD5 

545FFFFCBFFFFC5FFFFC 

BFFFFC30003078007878 

0078000000 1C001C001C 

00 1C001C001C00 180018 

001800180O180017F817 

F818001FF81818181818 

18100810081008100810 

080001C003E07R60FFF0 

7FF001F007C003800180 

01800340034007600760 

066002400240O3C001C0 

01800180038007800000 



1105 

1500 

829 

1851 

814 

601 

1500 

831 

1626 

782 

406 

150 

1014 

150 

765 

510 

765 

1020 

1275 

1275 

1363 

1S45 

1231 

1461 r 

2099 

1909 \ 

2125 

443 

477 

756 

1709 

1535 

1986 

1154 

204 

132 

366 

671 

136 

1141 

1067 

469 

622 

524 



FORMA y se 
incrementa. 

4290-4300: Si es mayor 
que mueve 
se llama a 
CAMB1. 

4310-4320: Si es menor 
que 5 se 
llama a 
CAMB1. 




4330-4340: Se almace- 
na la nue- 
va forma y 
se llama a 
BFORM. 
4350-4370: Decrementa 
la coorde- 
nada X del 
muñeco y lo 
almacena 
de nuevo en 
COORX. 
4380: Se llama a REST 
que imprime la 
pantalla que había 
sido almacenada. 
: Se Ibma a PCOOR. 



4390: 



LISTADO 5 (DATOS) 



DUMP: 45000 
N.° BYTES: 285 



ISIS W r *. « » 



04 142F2806142F500513 288 1 
5F7804 104FB007050F4F 596 I 
3006135F60021B376007 451 I 
1D4F88031E4FC0040521 590 I 
372805185F5003203748 461 I 
07173F8O040737P8O208 465 
1P9F4603178798061D4F 684 
30051D3F30051D2F3005 327 
135F8O041B3778021PS7 563 
B8O70C127F20052P7F48 626 
©718P77O030C7F68O607 569 
7FP0071P94C8041E4F38 837 
07293748022447700623 437 
376806063790021E4FP8 649 
0709297F480518P778O4 576 
207F7006217FR0021787 757 
C8O71P57200712374005 501 
135F68031C3788O60613 471 
«77802127FP8O30D3F3© 729 
071 14F68050C376006OB 392 
4 c BO0 '0h LS Tf -i 802 I Bfl ? 663 
780316877007127FR002 706 
19373805193748061937 379 
5806135F7804 154FB807 623 
OD3FB0030P0F97300629 526 
7F480218P778040C7F68 759 
07067F98021097B0060B 654 
4F30071C375804135F78 543 
06142F80030000000000 204 



913® 
a* 



¿.0NGUIT 



4400-4410: Se hace una 
pausa lla- 
mando a 
una rutina 
de la ROM 
y con el va- 
lor de espe- 
ro en BC. 

4420: Se salta a VOLV. 

4450-4510: Se calculan 
las coorde- 
nadas que 
hay a la de- 
recha del 
muñeco. 

4520-4530: Se halla el 
color que 
hoy en esas 
coordena- 
das. 



4560-4570: Si hay una 
puerta salta 
a PUEDE. 

4580-4590: Si hay un 
muro salta a 
VOLV. 

4600-4610: Si no hay 
una escale- 
ra salta a 
CONT9. 

4620-4650: Si ha choca- 
do con una 
escalera se 
salta a 
VOLV. 

4660-4690: Si el valor 
de FORMA 
es menor 
que 5 salta 
a CONT6. 

4700-4710: Se carga 1 
en A y se al- 
macena en 
FORMA. 

4720: Se llama a BFORM. 



4730 



4760 



4770: 
4780- 



4800 
4830 



-4750: Se incremen- 
ta la coor- 
denada X 
en dos y se 
almacena. 
Imprime la panta- 
lla. 

Se llama a PCOOR. 
4790: Se realiza 
una pausa. 
: Salto a VOLV. 
4850: Aquí se lle- 
ga si se ha 
pulsado la 
tecla de sal- 
to. Si el mu- 
ñeco ya es- 
taba saltan- 
do, SALTO 



contendrá 
un 1 y se re- 
torna. 

4860 -4870: Pone SALTO 
a 1. 

4880-4900: Se carga en 
CONT el 
número de 
veces que 
habrá que 
incrementar 
la coorde- 
nada Y del 
muñeco. Se 
retorna. 

SUBIR: Aquí se llega si 
SALTO contiene 1 . 

4930-4950: Decrementa 
el contador 
de veces 
que hay que 
hacer subir 
al muñeco. 

4960-4970: Si no es 0 
salta a 
CONT7. 

4980 -4990: Si no es 0 se 
pone SAL- 
TO a 0 y se 
llama a BA- 
JAR. 

5000: Se vuelve a TE- 
CLAS. 

5010-5030: Incrementa 
la coorde- 
nada Y del 
muñeco y 
se almace- 
na. 

5040: Recupero la pan- 
talla. 

5050: Llama a PCOOR. 
5060 5070: Hace una 

pausa. 
5080: Vuelve a teclas. 
5120-5140: Pone FOR- 



MA a 5 y re- 
torna. 

5160-5210: Halla la di- 
rección don- 
de se en- 
cuentra el 
gráfico de la 
forma del 
muñeco que 
hay que im- 
primir. 

5220-5270: La almace- 
na en las eti- 
quetas que 
utiliza la ru- 
tina de im- 
presión y re- 
torna. 

5290-5340: Coloca las 
coordena- 
das del mu- 
ñeco en las 
etiquetas 
que utiliza lo 
rutina de 
impresión, 
lo imprime y 
retorna. 

5360-5440: Halla la di- 
rección del 
archivo de 
atributos de 
una direc- 
ción del ar- 
chivo de 
pantalla. 

5460-5580: Calcula las 
coordena- 
das que hay 
debajo del 
muñeco en 
su parte iz- 
quierda. 

5590-5620: Halla el co- 
lor de estas 
coordena- 



5630-5670 



5680-5690: 



5700-5730 



5740-5940 



5950-5970 



5980-6020 



6050-6110 



6120-6130 



das. 

Si es un te- 
cho o un 
suelo se re- 
torna, ya 
que el mu- 
ñeco no de- 
be caer. 
Si no es el 
color de uno 
escalera sal- 
ta a 
CONT12. 
Si está to- 
cando la es- 
calera re- 
torna. 

Realiza lo 
mismo pero 
para las 
coordena- 
das que hay 
debajo del 
muñeco y a 
su derecha. 
Decrementa 
la coorde- 
nada Y y se 
almacena 
en COORY. 
I mprime 

f>antalla, 
lama A 
PCOOR, 
hace una 
pausa y cie- 
rra el bucle 
sobre BA- 
JAR. 

Si está en la 
pantalla 1, 
4 0 7 salta o 
CONT10. 
Decrementa 
el número 
de pantallas 



6140-6160: 



6170-6190 



6200-6220 



6230-6270 



6280-6350 



6380-6420: 



6430-6470 



6480-6500 



6510-6570 



6580-6640 



y lo almace- 
no en PANT. 
Actualiza 
las coorde- 
nadas del 
muñeco y se 
salta a EMP. 
Si el muñeco 
está en el pi- 
so de aba- 
jo salta a 
CONT11. 
Disminuye 
el número 
de pantalla 
en 3. 

Actualiza 
las coorde- 
nadas del 
muñeco y 
salta a EMP. 
Aumenta en 
3 el número 
de panta- 
lla, se ac- 
tualizan las 
coordena- 
das del mu- 
ñeco y salto 
a EMP. 
Si está en la 
pantalla 6 ó 
9 salta a 
CONT13. 
Aumenta el 
número de 
pantalla, se 
actualizan 
las coorde- 
nadas del 
muñeco y se 
vuelve a 
EMP. 

Si el muñe- 
co está en 
el piso de 
abajo salta 
a CONT5. 
Actualiza 
las coorde- 
nadas, recu- 
pera la pan- 
talla, llama 
a PCOOR y 
se vuelve a 
TECLAS. 
Actualiza 
los coorde- 
nadas, lla- 
ma a REST, 
llama a 
PCOOR y 
vuelve a TE- 
CLAS. 








511 


DEFB 16,16,199,221 




OUT (254) , A 


21 ¡t 


i 


521 


DEFB 16.24,232,221 


* 


31 ;• RUTINA 0€ NAPÉAM • 


531 


OEFB 16.24,25.221 






41 (« 


t 


541 


DEFB 24,24.74,221 


1141 


LD DE, SUELO 






551 


DEFB 16,24,147,221 


1151 


CALL SITUA 


61 




561 


DEFB 32.16,196.221 


1161 


LO 8,8 


71 


m 5iiti 


571 


OEFB 16,24.5,222 


1171 REPI 


PUSH 8C 


81 


ENT 5IIII 


581 VENIAN DEFB 24,24,54.222 


1181 


CALL 1HPRI 


91 




591 


DEFB 41,24.127,222 


1191 


POP BC 


III 


JP SE6U1R 


611 


DEFB 16,24,248,222 


lili 


LO A,(P0SX) 


111 




611 TEJAD 


OEFB 32,16,41,223 


lili 


A00 A, 32 


i2t inpri 


EOU 64111 


621 


OEFB 32.24,116,223 


1121 


LO (POSO, A 


131 PANT 


EOU 58111 


631 


DEFB 16,16,213.223 


1131 


DJN2 REPI 


MI COORT 


EOU 58111 


641 


OEFB 16,24,236,223 


1141 


LD HL .TECH 


151 COORX 


EOU 58112 


651 


DEFB 16.24,29,224 


1151 


LD DE. TECHO 


161 FORMA 


EOU 58113 


661 PUERTA OEFB 8.32,78.224 


1161 


CALL SITUA 


171 SALTO 


EOU 58114 


671 ESCAL 


DEFB 32,32.111.224 


1171 


CALL SUBI 


181 COKT 


EOU 58115 


681 


DEFB 24.24,241,224 


1181 


LD A.175 


191 POS 


EOU 23311 


691 


DEFB 16.24,57.725 


1191 


LD (POSYM 


211 POSY 


EOU 23311 


7W 


OEFB 16,24.116,225 


1211 


CALL SUBI 


211 N000 


EOU 23312 


711 




1211 


JR C0NT1 


221 ANCHO 


EOU 23313 


721 DPAN 


DEFB 214,175 


1221 SUBI 


LD 8,8 


231 ALTO 


EOU 23314 


731 


OEFB 221.175 


1231 REP2 


PUSH 8C 


241 color 


EOU 23315 


741 


OEFB 242,175 






251 INFER 


EOU 23316 


751 


OEFB 7.176 


1251 


POP 8C 


261 SUPER 


EOU 23317 


761 


OEFB 41,176 


1261 


LD A.(POSX) 


271 




771 


OEFB 89.176 


1271 


A00 A. 32 


281 TABLA 


D€F6 16.24.64,215 


781 


DEFB 126,176 


1281 


LO <P0SX>,A 


291 


DEF8 16,24,113,215 


791 


DEFB 151.176 


1291 


IM REP2 


311 


DEF8 16,24.162.215 


881 


DEFB 192,176 


1311 


KT 


311 PUERT2 DEF6 8,32,211.215 


811 




1311 C0NT1 


LO A. (PANT) 


321 ESCAL2 D€FB 32,32.244,215 


821 




1321 


CP 3 


331 


0EF6 24,24,117,716 


831 SE6UIR LD A, 2 


1331 


JR 2.NUR02 


341 


OEFB 16,24.191,216 


841 


CALL 11611 


1341 


0* 6 


351 TECHO 


0€F8 32.8.239,216 


851 


LD A, 7 


1351 


jr :.muro2 


361 MURO 


D€FB 16.32.16,217 


861 


U> (23693), A 


1361 


CP 9 


371 SUELO 


OEFB 32,16,81,217 


871 


LD (23624) .A 


1371 


JR 7.NUR02 


381 


OEFB 24,16,146,217 


881 


LD A. 96 


1381 


LO HL.PARI 


391 


OEFB 41.24,195,217 


891 


LD (COORX).A 


1391 


ID DE, PARED 


411 


DCF6 32,8,61.218 


911 


LO A, 127 


1411 


CALL SITUA 


411 PARED 


OEFB 8.32.93.218 


911 


LD (COOJrTM 


1411 


LD HL.PUEl 


421 


OEFB 24,16,126,218 


921 


XOR A 


1421 


LO DE, PUERTA 


431 


OEFB 24,16.175,218 


931 


LD (SALTO), A 


1438 


CALL SITUA 


441 


OEFB 24,16,224.218 


941 


INC A 


1441 


ID A. (PANT) 


451 


OEFB 16,24,17,219 


«51 


LD (F0*NA>.A 


1458 


CP 3 


461 


OEFB 16.24,66.219 


961 


LO A,8 


1461 


JR C.C0NT2 


471 
481 


OEFB 32.16,115,219 
OEFB 24,16,181,219 


971 
981 


LD (PANT), A 


1471 
1481 


LD HL.PUE2 
LD DE. PUERTA 


491 


0EF8 32.32.229,219 


991 EMP 


CALL 3435 


1491 


CALL SITUA 


511 


OEFB 24.32.112.221 


lili 


LO A.l 


1511 


LO HL.PAR2 




1311 


LD DE, PAREO 


1521 


CALL S1TIM 


1331 


jr CCNT2 


1541 MURO? 


LD HL.MUÍ3 


1331 


LO X ffJRO 


1561 


CALL SITUA 


1571 




1581 


CP 3 


159» 


JR 2 .TRES 


1611 




1611 


LO DE PUERTA 


1621 


CALL SITUA 


1631 


LO KL PARI 


1641 


LO DE PARED 


1631 


CALL SITUA 


llti 


LO HL PUE8 




IV Ut.rutKIH 


1481 


CALL SITUA 


1691 


LO Hl PAR6 


1711 


LO DE, PARED 


1711 


CALL SITUA 


1721 


LD HL.MUR4 


1731 


LD DE .MURO 


1741 


CALL SITUA 


1731 


JR COMT2 


1741 TRES 


LD HL.MUR5 


1771 


LD DE, MURO 


17N 


CALL SITUA 


1791 CONT2 


LD A.(PANT) 


1811 


CP I 


1811 


JR Z.MUR 


1821 


CP 4 


1831 


jr ¡m 


1841 


CP 7 


1831 


JR 2.HUR 


1861 


LO HL.PAR3 


1871 


LO DE, PAREO 


1881 


CALL SITUA 


1891 


LO HL.PUE3 


1911 


LD 0E,PUERT2 


1911 


CALL SITUA 


1921 


LO A.(PAKT) 


1931 


CP 3 


1941 


JR C.HUR 


1951 


LD HL.PAR4 


1961 


LO DE, PARED 


1971 


CALL SITUA 


1981 


LD HL.PUE4 


1991 


LO OE.PUERT2 


2111 


CALL SITUA 



2111 


JR TEJADO 


22 


CP 4 


3818 


m 


BC 


3511 PUE6 


DEFB 167,8,68 


2121 MUS 


LO A.(PAHT) 


2528 


JR 2, ESC 


3828 


DJN2 OTRA 


3528 NUR2 


DEFB 135.8,22 


2131 


CP 2 


2538 


CP 7 


3838 


LO 


HL, 16384 


3538 NUR3 


DEF8 63,241,22 


2141 


JR 2, TEJADO 


2548 


JR 2 .ESC 


3841 


LD 


DE, 35881 


3541 PUE7 


OEFB 95,241,68 


2151 


LD HL.NUR1 


2558 


JR CCNT4 


3151 


LO 


BC.69I2 


1551 NUR4 


OEFB 167,241,22 


2161 


LD DE .MURO 


2568 ESC 


LO HL.ESC1 


3868 


LUI 




3561 PUE8 


DEFB 135,241,68 


2171 


CALL SITUA 


2578 


LO DE.ESCAl 


3878 


jp 


SEGU2 


3578 PAR6 


DEFB 135.248,6 


2181 


LO HL.PAR3 


2588 


CALL SITUA 


3881 






3588 HUR5 


DEFB 95,241,27 


2191 


LD DE, PARED 


2598 CQNT4 


LD A,(PAKT) 


3898 SITUA 


DI 




3591 SUEL 


DEFB 31,1,22 


2111 


CALL SITUA 


2688 


CP 6 


3188 


LD 


A, (DE) 


3681 TECH 


OEFB 183,8,48 


2111 


LD HL.PUE5 


2618 


JR 7.ESC8 


3118 


LD 


(ANCHO), A 


3611 NUR6 


DEFB 63,1,22 


2121 


LD DE.PUERT2 


2628 


CP 9 


3128 


II 


DE 


3628 


2131 


CALL SITUA 


2638 


JR 2.ESC8 


3138 


LD 


A. (DE) 


3638 FIGURA 


DEFB 64,215 


2141 


LD A , < PANT ) 


2641 


JR CONT5 


3141 


LD 


(ALTO), A 


3648 


OEFB 113,215 


2151 


CP 1 


2638 ESC8 


LO HL.ESC2 


3138 


INC 


OE 


3658 


DEFB 64,215 


2161 


JR 2, TEJADO 


2668 


LO DE.ESCAL2 


3168 


Ll 


A, (DE) 


3668 


OEFB 162,215 


2171 


LD HL.PAR4 


2678 


CALL SITUA 


3171 


LD 


(INFERÍ ,A 


3678 


DEFB 186,225 


2181 


LD DE, PARED 


2688 COKT5 


LO A,(PAKT) 


3188 


INC 


DE 


3688 


OEFB 236.223 


2191 


CALL SITUA 


2698 


CP 7 


3198 


LD 


A,(OE) 


3698 


DEFB 116.225 


2211 


LO HL.PUE6 


2788 


JR N2.SIG 


3281 


LD 


(SUPER).A 


3788 


0EF8 29,224 


2211 


LD OE.PUERT2 


2718 


LD HL.MUR6 


3211 


LD 


A.(HL) 


3711 


2221 


CALL SITUA 


2728 


LD DE, MURO 


3228 


LD 


<POSY),A 


3728 SE 60? 


LD A, 16 


2231 


LD HL.MUR2 


2738 


CALL SITUA 


3231 


M 


HL 


3738 


LD (ANCHOLA 


2241 


LD DE, MURO 


2748 




3248 


Ll 


A,(HL) 


3741 


LD A.24 


2251 


CALL SITUA 


2758 




3258 


L» 


(POSX),A 


3758 


LD (ALTO) ,A 


2261 TEJADO LO A.(PAKT) 


2768 SI 6 


LD A,(PANT) 


3268 


BC 


HL 


3761 


LD A.7 


2271 


CP 4 


2778 


LD 6,A 


3278 


IB 


A,(HL) 


3778 


LD -COLOR;, A 


2281 


JR NC.CONT3 


2788 


LD DE.OPAN-2 


3288 


LO 


(COLOR), A 


3788 


CALL BFORN 


2298 


LD DE .TEJAD 


2791 8UCI 


INC DE 


3298 


PUSH HL 


3798 


CALL PCOOR 


2311 


LD HL.TEJ 


2881 


INC DE 


3388 


CALL mi 


3881 


CALL INPRI 


2311 


CALL SITUA 


2811 


DJN2 BUC1 


3311 


POP 


HL 


3811 




2321 


LD 8,5 


2828 


LO A, (DE) 


3328 


El 




3821 




2331 REP3 


PUSH BC 


2838 


LD L,A 


3338 


R 1 




3838 TECLAS LD A.IFE 


2341 


LD B.8 


2841 


INC DE 


3348 






3841 


IN A,(8FE) 


2331 REP4 


PUSH BC 


2851 


LD A, (DE) 


3358 






3858 


BIT I.A 


2368 


CALL IMPfll 


2868 


LD H,A 


3368 PARI 


DEFB 95.248.6 


3868 


JR 2.PULI2 


2371 


POP BC 


2878 


LD A,(HL) 


3378 PUEI 


DEF8 63,248,68 


3878 


LO A.IFE 


2388 


LO A, (POSO 


2888 


LO B,A 


3388 PUE2 


DEFB 135,248,68 


3888 


IN A.(BFE) 


2398 


ADO A, 32 


2891 OTRA 


PUSH BC 


3398 PAR2 


DEFB 167,248,6 


3898 


BIT 2.A 


2411 


LO (POSX),A 


2911 


INC HL 


3481 PAR3 


DEFB 95,8,6 


3988 


JR 2, PUL DE 


2411 


DJN2 REP4 


2918 


LD A,(HL) 


3411 PAR4 


DEFB 167,1,6 


3918 VOLV 


LD A.17F 


2421 


LO A,(POST) 


2928 


INC Hl 


3421 PUE3 


DEFB 63,1,68 


3928 


IN A.(IFE) 


2438 


SUB 16 


2938 


LO B,A 


3431 PUE4 


OEFB 135,1,68 


3938 


8IT t,A 


2448 


LO <POSY),A 


2948 


LD DE, TABLA -4 


3441 ESCI 


DEFB 135,16,67 


3948 


CALL 2 , PSALT 


2438 


POP BC 


2958 8UC2 


INC DE 


3458 ESC? 


DEFB 63.288,67 


3951 


LO A.IBF 


2461 


DJN2 REP3 


2968 


INC DE 


3468 WEKT 


DEFB 151,128,2 


3961 


IN A,(8FE) 


2471 


LO HL.VEHT 


2971 


INC DE 


3471 TEJ 


DEFB 175,8,2 


3971 


BIT I.A 


2488 


LD DE.VEHTAN 


2988 


INC OE 


3488 NURI 


DEF8 95,8,22 


3981 


RET 2 


2498 


CALL SITUA 


2998 


DJN2 BUC2 


3498 PAR5 


DEFB 63,8,6 


3991 


LO A. (SALTO) 


2388 CDKT3 


LO A, (PANT) 


3818 


CALL SITUA 


3588 PUES 


OEFB 63,8,68 


4111 


OR A 




TÉCNICAS 
DEL MAPEADO Ot 



7,224,3, 192, 1, 128, 1 , 128. 1, 128,9. 
144,89, 153,217, 155 , 217 , 155 ,217 , 1 
55,211 ,203,205, 179,66,66,60,60,0 



4111 


JP N2, SUBIR 




m 


BC 


5811 C(NT7 




5516 


El 




Mil 2, BAJAS 




CALI 8874 


5626 


AOO A, 2 


3326 


RET 


41 


JR TECLAS 


r~ 


CALI BATRI 


5636 


LD (COORY).A 


5536 










m 


BC 


5648 


CALL REST 


5346 


BAJAR ID A.(COORX) 


4656 






10 


A. (DE) 


5856 


CALL PCOOR 


3556 


LD C.A 


4666 PU.IZ 


LO A.íCOORX' 




CP 


68 


5666 


LO BC.5 


5368 


LO A.CCOORY) 


4171 


OfC A 


4571 


jp 


2, PUEDE 


5178 


CALI 6IF3D 


5578 


SUB 24 


4(61 


10 C,A 


4581 


CP 


22 


5688 


JP TECLAS 


5568 


ID B.A 


4191 


10 A,(C0OHY) 


4591 


JF 


2, VOIV 


5898 


RET 


5598 


PUSH BC 


4111 


SUB 23 


4681 


CP 


67 


5168 




5668 


CALL 8874 


4111 


10 B.A 


4611 


a 


N2.CCNT9 


5116 




3616 


CALI BATRI 


4121 


PUSH BC 


4628 


CALI 8916 


5126 CAMBI 


LD A, 5 


5628 


POP BC 


4131 


CALI 8874 


4638 


MU 


11733 


5136 


LD ( FORMA». A 


5638 


LD A,(0£) 


4141 


CALL BATR1 


4648 


3P 


A 


5146 


RET 


5646 


CP 46 


4151 


POP BC 


4654 


JP 


w.vav 


5158 




5656 


RET 2 


4161 


10 A,(D£> 


4668 C0MT9 


LO 


A, (FORMA) 


5166 BFORM 


ID A, (FORMA) 


5668 


CP 22 


4171 


CP 68 




K 


A 


5178 


LO HL.FI6URA-2 


3678 


RET 2 


4181 


JP 7,PUEI? 


xm 


CP 


5 


5188 


LD 8.A 


5688 


CP 67 


4191 


CP 22 


4698 


1 


C.C0NT4 


5198 BUC3 


INC m 


5698 


JR N2.COHT12 


42(1 


JR 2 ,VOLV 


47(8 


LO 


A.l 






5786 


CALI 8916 


4211 


CP 47 


4718 C0WT6 


u 


(FORMA) .A 


5216 


DJN2 BUC3 


5716 


CALL 11733 


4221 


JR N2.CCNT8 


4728 


CAL. 


BFORM 


5228 


ID A, KL 


5728 


OR A 


4231 


CALI 8918 


4738 


LO 


a.ícoorx) 


5236 


LD (INFER1.A 


5738 


RET N2 


4241 


CALI 11733 


4748 


m 


A.2 


5248 


INC NI 


5746 C0NT12 LO A.íCOOW) 


4254 


OR A 


4738 


ID 


(COORXM 


5258 


ID A,(HU 


5738 


AOO A, 15 


4261 


JR N2.V0LV 


4768 


CAll R£S7 


5268 


LD (SUPER).A 


5768 


10 C ,A 


4271 CWT8 


LO A, (FORMA) 


4778 


CALL 


PCOOR 


5278 


RET 


5778 


LO A.(COORT) 


4281 


INC A 


4788 


LD 


8C.5 


52B8 




5788 


SUB 24 


4291 


CP 9 


4798 


CALI (1F30 


5298 PCOOR 


LD A.(COORX) 


5798 


LO 8 .A 


4311 


CALI NC.CAM8I 


488( 


JP 


VOIV 


5386 


LO (POSO, A 


588( 


PUSH BC 


4311 


CP 5 


461 8 






5316 


LO A.(COORY) 


58K 


CALL B874 


4321 


CALI C.CAMB1 


4828 






5328 


LD (POST>,A 


5826 


CALL BATRI 


4331 


LO (FORMA). A 


4B38 PSA17 


LD 


A, (SALTO) 


5338 


CALL 1MPRI 


5838 


POP BC 


4341 


CALI BFORM 


4848 


■ 


A 


5348 


RET 


5846 


LD A, (DE) 


4351 


LO A,(COORX> 


4858 


El 


K2 


5356 




5856 


CP 48 


4366 


SUB 2 


4868 


)HC 


A 


5368 BATRI 


LO A.H 


5646 


un 7 


4371 


LO (COOfBO.A 


4878 




(SALTO), A 


5378 


RRCA 


5878 


CP 22 


4381 


CALI REST 


4888 


u 


A,5 


5388 


RRCA 


5886 


RET 2 


4391 


CALI PCOOR 


4898 


lD 


(CCNT),A 


5398 


RRCA 


5896 


CP 67 


4411 


LO BC.5 


4986 


B£| 




5468 


AND 3 


5986 


JR N2.COXTI4 


4411 


CAll 6IF30 


4916 






3416 


OR 858 


5916 


CALL 8916 


4421 


JR VOIV 


4926 






5428 


LD O.A 


5926 


CALL 11733 


4431 




4938 SUBIR 


LD 


A,(C<HT) 


5436 


LD E.L 


5936 


OR A 


4441 




4946 


OF C 


A 


5446 


RET 


5946 


RET N2 


4451 FUOf 


LO A,<C00KX> 


4956 


u 


(COND.A 


3436 




5956 


C0XT14 LO A.(COORY) 


4461 


AOD A, 16 


4968 


H 


A 


5468 REST 


DI 


596( 


SUB 2 


4471 


10 C.A 


4978 


1 


N2.COKT7 


S478 


ID HL.33868 


5976 


LD (COORY),A 


4481 


LO A.íCOORT. 


4988 


LD 


(SALTO), A 


5488 


ID DE, 16384 


5988 


CALL REST 


4491 


SUB 23 


4998 


CALL 


BAJAR 


5498 


LD BC.6912 


5998 


CALI PCOOR 


4511 


LO B.A 


5866 


JP 


TECLAS 


5586 


LDIR 


6666 


ID 8C.5 



6816 


CALI 61F30 


6826 


1 


MJM 


6838 






6846 

6858 PUEJ2 


LD 


A.ÍPAW!) 


6866 


rr 


I 


6878 


jp 


7.COMTI6 


6686 


CP 


4 


6898 


a 


2.CBÍTI8 


6168 


CP 


7 


6116 


1 


7.CCNTI8 


6128 


ate 


A 


6138 


10 


(PANT).A 


6148 


u 


A, 232 


6138 


LD 


(COORXM 


6168 


9 


EMP 


6178 CCNT16 ID 


A.(COORY) 


6188 


:p 


95 


6198 


JR 


CCUflll 


6266 


LD 


A.(PANT) 


6216 


M 


3 


6228 


u 


(PANT),A 


6238 


u 


A, 55 


6248 


U) 


(CO0RY),A 


6238 


u> 


A. 18 


6266 


LD 


(COOBO.A 


6276 


w 


EMP 


6766 CONTII LD 


A.(PANT) 


6298 


AK 


A, 3 


6366 


.0 


(PANT).A 


6316 


10 


A. 18 


6328 


LD 


(C0ORX),A 


6331 


LD 


A, 159 


6348 


LO 


(CO0RY),A 


6358 


JP 


EMP 


6368 






6378 






6388 PUEDE 


10 


A,(PANT) 


6398 


CP 


4 


6466 


JR 


2.C04T13 


6416 


CP 


9 


6426 


I 


2.COMT13 


6436 


¡NC 


A 


6446 


LI- 


<PANT),A 


6436 


LI 


A, 16 


6446 


LD 


(COOO).A 


6478 


JP 




6488 C0MT13 LO 


A,(ctwrf) 


6498 


CP 


93 


6586 


M 


C.CCNT15 


6518 


LD 


A.87 


6328 


lD 


(CO0RT),A 


6336 


LD 


A, 227 


6548 


u 


(C00RX1.A 


6336 


CALL REST 


6368 


CALL PCOOR 


6578 


JP 


TECLAS 


6568 C0NT15 LO 


A, 127 


6598 


ii 


(CO0RY),A 


6686 


LD 


A, 222 


6416 


LD 


(COOXX),a 


6626 


CALI REST 


6638 


CAli 


PCOOR 


6648 


JP 


TECLAS 




THESB» 

ART STUDIO 




gráficas 




«The Art Studio» fue coli- 
ficado en su momento como 
la mejor utilidad de dibujo 
para Spectrum situándola 
pareja al potente «Mac- 
Paint» del Macintosh. Entre 
sus peculiaridades destacan 
el sencillo manejo por ico- 
nos y la posibilidad de em- 
plear ratón, ioystick o recu- 
rrir al teclaao. Además de 
ser el único programa con 
menú de impresoras. 

Consta de un menú prin- 
cipal con once opciones di- 
ferentes, de las que se ge- 
neran submenús específicos. 
La forma de acceder a ellos 
es trasladar un icono sobre 
la opción deseada y dejar 
volar nuestra imaginación 
combinando las amplias po- 
sibilidades de este progra- 
ma de dibujo. 

Las opciones del menú 
principal son: 

PRINT, permite sacar una 
copia por impresora de la 
pantalla, eligiendo el tama- 
ño y justificando a nuestro 
antojo a derecha o izquier- 
da. 



MICROMRNIA 
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FILE, se utiliza para vol- 
car en pantalla los gráficos 
salvados en cinta. Permite 
además de salvar, cargar y 
verificar archivos, o mezclar 
dos pantallas. 

ATTRS, sirve para modifi- 
car los atributos con los que 
trabajemos, cambiando co- 
lor de tinta, papel o borde 
y detallando brillo, flash, in- 
verse, etc. 

PAINT, podremos elegir 
para dibujar entre lápiz, 
spray y brocha, modifican- 
do la configuración dentro 
de un submenú de dieciseis 
especificaciones. 

MISC, incluye un variado 
submenú formado por sien- 
te opciones que permiten 
desde borrar la pantalla, 
crear un rejilla de los atribu- 
tos u observar la pantalla 
completa. 

UNDO, elimina la última 
operación realizada en la 
pantalla. 

WINDOW, permite deli- 
mitar ventanas y trabajar 
con ellas aprovechándonos 
de su utilidad, empleando 
las dieciseis variantes del 
menú. 

FILL, rellena con color o 
con cualquiera de las 64 
tramas una superficie pre- 
viamente delimitada. 

MAGNIFY, para ampliar 
una zona de la pantalla en- 
tre dos y ocho veces, y tra- 
bajar en ella. 

TEXT, introduce texto en 
pantalla; permite modificar 
tamaño y grosor de los ca- 
racteres. 

SHAPES, sirve para crear 
figuras. 

Como veis estamos ante 
un programa muy comple- 
to, de fácil manejo, que 
cumple a la perfección su 
objetivo prioritario, emular 
a Miguel Ángel con un so- 
fisticado método. 



1 

1 


\ 

l 












NORM«t_ 




"MELBOURNE DRAW" 

Éste fue uno de los prime- 
ros progromos de dibujo 
que llegaron para Spec- 
trum. Introdujo en su mo- 
mento interesantes noveda- 
des, como trabajar con to- 
da la pantalla o ampliar 
una parte de ella. Su mane- 
jo se realiza a través del te- 
clado o del ¡oystick, situan- 
do el cursor y la pantalla en 
los diferentes modos que 
combinados permiten el ac- 
ceso a variadas opciones. 
La información aparece en 
las dos lineas inferiores de 
pantalla, pudiendo ser des- 
plazadas para poder traba- 
jar en estas líneas. El cursor 
puede estar en cuatro mo- 
dos: normal, dibujo, borra 
e invierte. A su vez el cursor 
puede cuatriplicarse dando 
como resultado cursores en 
alta y baja resolución, el de 
texto y el de scroll. Incluye 
también la posibilidad de 
ampliar un detalle de la 
pantalla o manejar una ex- 
tensa gama de colores y 
atributos. Un programa de 
fácil manejo, con grandes 
posibilidades. 




GUÍA DE 7C 
UTILIDADES #3 



'LEONARDO" 



«Leonardo» es un progra- 
ma de dibujo para realizar 
pantallas, gráficos definidos 
por el usuario y elementos 
gráficos, variando su tama- 
ño desde un pixel a toda la 
pantalla. 

El programa presenta tres 
opciones en el menú princi- 
pal: creación de dibujos, 
salvar y cargar gráficos. Pa- 
ra manejar el programa po- 
demos emplear un joystick o 
el teclado. Si elegimos la op- 
ción de creación de dibujos 
en pantalla aparecerá el 
cursor que nos permitirá di- 
bujar. Dentro de esta op- 
ción encontraremos una ex- 
tensa variedad de posibili- 
dades a las que accedere- 
mos mediante determinadas 
teclas. Existen dos modos de 
cursor: el modo pixel, mo- 
verá el cursor pixel a pixel 
y su tamaño es de un pixel; 
y el modo carácter, lo mue- 
ve de carácter a carácter y 
su tamaño es de 8 x 8 pixels. 
Para poder dibujar es pre- 
ciso poner el cursor en mo- 
do plot. Es imprescindible 
en muchos momentos cono 
cer el modo en el que no^ 
encontramos o la localiza 
ción exacta del cursor, pa 
ra ello diferentes teclas noi 
irán suministrando la infor 
moción a través de una ven 
tana en pantalla. 

«Leonardo» tiene una lar- 
ga lista de comandos que 
permiten desde invertir, bo- 
rrar, rellenar y realizar 
cualquier diseño geométrico 
a una amplia variedad de 
posibilidades. Un programa 
interesante aunque resulte 
en algunos momentos lioso 
por la gran variedad de te- 
clas a utilizar. 



Mi; 





Este programa se maneja 
a través del teclado median- 
te el clásico sistema de me- 
nús, combinados con dos 
cursores que si lo deseamos 
podrán trabajar simultá- 
neamente en pantalla. «The 
Artist» consta de tres menús 
que se representan en lo 
parte inferior de la pantalla, 
que a su vez abarcan un 
amplio número de opcio- 
nes. 

Con el primer menú po- 
dremos invertir, desplazar o 
almacenar en memoria los 
gráficos, preseleccionando 
de antemano el tamaño de 
la brocha y la trama. Permi- 
te también borrar la última 
operación realizada en 
pantalla e insertar texto. 

El segundo menú presen- 




ta diez opciones diferentes; 
tal vez la más interesante es 
la de poder manipular una 
pantalla cargada previa- 
mente, con la consiguiente 
ampliación o reducción. 
También desde este menú 



podremos crear figuras 
geométricas y recurrir a la 
opción are para dibjuar ar- 
cos que serán delimitados 
gracias a una tecla. Podre- 
mos rellenar también las fi- 
guras con gran rapidez. 




"SábadoChip",del7al9h. 
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'DRAWER" 



Este programa no presen- 
ta grandes diferencias con 
el resto de los programas 
analizados manejados des- 
de un menú en la parte in- 
ferior de la pantalla. Como 
os indicamos el manejo es 
semejante, un elevado nú- 
mero de teclas van dando 
paso a las diferentes opcio- 
nes de que consta. 

El cursor puede estar en 
cuatro modos: pintar, inver- 
tir, xor y el modo desplaza, 
que responden al plantea- 
miento inicial de cualquier 
programa de dibujo. Permi- 
te también realizar scrolls en 
pantalla o introducir textos. 
La ampliación de una parte 
de la pantalla es un detalle 
a tener en cuento, ya que 
facilita considerablemente 




nuestro trabajo. Al igual 
que la posibilidad de mane- 
jar dos parrillas guía para 
distinguir la posición de los 
caracteres. Presenta tam- 
bién la opción de Fill, que 
permite rellenar eligiendo 
entre diez tramos diferen- 
tes. 

«Drawer» admite la posi- 
bilidad de almacenar en 
memoria la pantalla sobre 
la que trabajamos. Un da- 
to interesonte que hace de 
«Drawer» un buen progra- 
ma, que aunque no se ca- 
racteriza precisamente por 
su sencillo manejo, no llega 
a ser excesivamente compli- 
cado, permitiendo realizar 
nuevas experimentaciones 
en el campo del diseño. 





Todos los sábados, de 5 a 7 
de la tarde, en "Sábado Chip" 
Dirigido por Antonio Rúa. 
Presentado por José Luis 
Arriaza, hecho una 
computadora. Dedicado en 
cuerpo y alma al ordenador, 
y a la informática. Haciendo 
radio chip... estilo Cope. 



1 l.-l. 

•[.lfl.< 


_li -Mi . i i 

k<l (••♦él 


í 





j ; 



RADIO POPULAR 

... de chip a chip 



AR L 




"PAINT PLUS" 

Todos los usuarios de 
Spectrum interesados en al- 
guna medida en los progra- 
mas de diseño gráfico cono- 
cerán el «Paint Box», uno de 
los primeros programas que 
aparecieron. «Paint Plus», 
basado en este programa, 
perfecciona muchas de las 
opciones de su predecesor. 

Presenta un menú con 
cuatro opciones. El editor 
de UDG posee cuatro ban- 
cos gráficos; permite mane- 
jar los gráficos realizando 
rotaciones, inversiones y 
ampliaciones de pantalla 
entre otras cosas. La segun- 
da opción es el Plotter, o 
modo de alta resolución, 
permite el manejo de la 
pantalla punto por punto; 
asi como salvar y cargar 
pantallas, borrar la última 
operación y tiene cinco tra- 
mas diferentes de fill. La op- 
ción Screen planer posibili- 
ta la introducción de textos 
y gráficos, asi como cam- 
biar los colores de los carac- 
teres. La última opción, Or- 
ganiser, se presenta en un 
programa adicional que sir- 
ve para almacenar un má- 
ximo de cinco pantallas y 
grabarlas en un fichero. 

«Paint Plus» dispone de 
una página de ayuda que 
solucionará en parte el pro- 
blema de memorizar un ele- 
vado número de teclas. Sin 
embargo no permite traba- 
jar en las dos líneas inferio- 
res de la pantalla, ya que 
no admite la posibilidad de 
desplazar el menú, ni alma- 
cenar figuras. 
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"DYNAMIC GRAPHICS" 

Dynamic Graphics es un 
paquete de diseño formado 
por tres programas que te 
permitirán experimentar en 
el campo del dibujo desde 
tu Spectrum. 

Los tres programas se 
complementan para dar co- 
mo resultado una útil herra- 
mienta de gran calidad. El 
primer programa es un di- 
señador de sprites. El se- 
gundo permite la creación 
de subrutinas de dibujo pa- 
ra incorporarlas a los pro- 
gramas del usuario; y el ter- 
cero llamado «Drawmaster» 
que trata de la creación de 
dibujos. 

En el primer programa 
encontraremos cuatro me- 
nús que permiten el acceso 
a más de veinticinco coman- 
dos. Las posibilidades son 
muchas, podremos desde 
borrar la ventana, invertir- 
la, modificarla, insertar un 
carácter, utilizar un carácter 
como un UDG, dividir la 
ventana o grabar en cinta 
los dibujos. 

El segundo programa dis- 
pone de cinco comandos 
que permiten cargar en cin- 
ta los dibujos realizados con 
el primer programa, grabar 
la subrutina, autodestruir el 
programa, ir al Basic y 
crear la subrutina. 

El programa «Drawmas- 
ter», especialmente creado 
para dibujar, permite que el 
cursor esté en cuatro modos 
diferentes: draw, erase, 
over y trans. Podremos de- 
limitar el número de pixels 
por el que queremos que se 
mueva el cursor, jugar con 
los comandos para modifi- 
car los atributos, rellenar 
con tinta una parte del dibu- 
jo y cargar y salvar en cinta 
las pantallas. 

Un paquete interesante, 
en el que aunque el progra- 
ma de dibujo es algo limita- 
do, comparado con otros 
programas del mercado, sin 
embargo combinados for- 
man una interesante utili- 
dad gráfica. 





PERIFERICOS 



Todo diseñador gráfico 
debe cumplir dos objetivos. 
Por una parte permitir des- 
de el ordenador la creación 
de diseños dependiendo sus 
posibilidades del software 
elegido, y por otro lado la 
medida en que facilita su 
realización al usuario. Esta 
última razón hace que mu- 
chos de los programas de 
dibujo admitan que a la ho- 
ra de manejarse la sustitu- 
ción del teclado o el joystick 
por periféricos especialmen- 
te creados para hacer más 
cómodo su uso. Sin duda 
son los ratones y los lápices 
ópticos los que se ajustan a 
este cometido. 

AMX MOUSE y STAR 
MOUSE son los dos ratones 
compatibles con Spectrum. 
Permiten el manejo a través 
de iconos de las opciones 
del software que lo admi- 
tan. Su fácil manejo evita te- 
ner que recurrir constante- 
mente a hojas de consulta 
para su utilización. 

Los lápices ópticos permi- 
ten trabajar sobre la panta- 
lla en lugar del papel. Des- 
tacan el lápiz óptico Inves- 
trónica y lápiz óptico DK 
Tronics. 



"BETA BASIC" 

«Beta Basic» es una am- 
pliación del Basic del Spec- 
trum que añade considera- 
bles ventajas a la hora de 
programar y trabajar con el 
ordenador. Añade 26 nue- 
vas instrucciones y diez fun- 
ciones. Además se introdu- 
cen mejoras en algunos co- 
mandos y se han añadido 
algunos rasgos como cursor 
parpadeante y un break pa- 
ra Código Máquina. Las 
nuevas instrucciones se ob- 
tienen de forma sencilla des- 
de el modo de gráficos, sus- 
tituyendo los gráficos por 
los comandos. 

Las instrucciones más im- 
portantes son entre otras: 

ALTER, para manipular 
los atributos de la pantalla. 
Permite cambiar la pantalla 
a una combinación de atri- 
butos, o por ejemplo crear 
un gráfico utilizando tinta 
del mismo color que el pa- 
pel y luego modificar la tin- 
ta. 

AUTO, pone en funciona- 
miento una numeración 
automática de lineas. 

BREAK, especial para 
C/M. 

CLOCK, controla la ope- 
ración de un reloj de 24 ho- 
ras con alarma. 

DEF PROC, END PROC, 
PROC, estos tres comandos 
sirven para llamar un pro- 
ceso, definirlo con un nom- 
bre y terminarlo. 

DELETE, borra todas las 
líneas de un bloque delimi- 
tado del programa. 

DO y LOOP, junto con las 
calificaciones whilw y until 
proporciona uno estructura 
de control ventajosa respec- 
to al Basic originario del 
Spectrum. 

DPOKE, significa doble 
poke, utilizando la dirección 
especificada y la siguiente. 

EDIT, permite editar un 
número de línea. 



GET, para leer el teclado 
sin usar ENTER, de forma si- 
milar a INKEY $. 

KEYWORDS, controla la 
utilización de las funciones 
de Beta Basic, como tokens 
o comandos introducidos 
carácter a carácter. 

ON, permite hacer un 
GOTO o GOSUB a un nú- 
mero de línea particular, 
dependiendo de una situa- 
ción dada. 

PLOT, para trazar una 
cadena de hasta 32 carac- 
teres al igual que los pixels 
usuales. 

RENUM, para renumerar 
las lineas de un programa. 

SORT, ordena cadenas, 
números o letras en orden 
ascendente o descendente. 

TRACE, permite la depu- 
ración de un programa en 
Basic. 
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'MEGABASIC 



Ampliar el sistema opera- 
tivo de cualquier ordena- 
dor, supone que aumenten 
considerablemente las posi- 
bilidades de los mismos a la 
hora de programar. «Me- 
gabasic», como bien indica 
su nombre, incorpore al Ba- 
sic del Spectrum nuevos co- 
mandos que se introducirán 
tecleando directamente el 
nombre; diferencia respec- 
to a otros programas que 
contenían en las teclas ori- 
ginarias los nuevos coman- 
dos. 

«Megabasic» tiene un sis- 
tema de edición muy com- 
pleto que incluye la posibi- 
lidad de desplazar el cursor 
horizontal y verticalmente, 
borrar líneas, copiar algu- 
nas para transpasarlas a la 
línea de edición para facili- 
tar la correción de los pro- 
gramas. El aspecto que más 
nos interesa en el tratamien- 
to de gráficos es la amplia 
gama de comandos refe- 
rentes a ventanas, borrado, 
scrolls con diferentes venta- 



nas informativas, etc. Tam- 
bién incluye tres juegos de 
caracteres en cuatro tama- 
ños distintos que hacen po- 
sible 12 tipos de letra dife- 
rentes. El tratamiento de 
gráficos y atributos ha sido 
potenciado con comandos 
para alterar los valores de 
ios atributos y almacenar o 
modificar bloques de gráfi- 
cos. También permite el lla- 
mamiento a subrutinas pre- 
viamente definidas. «Mega- 
basic» proporciona, al mis- 
mo tiempo, dos modos dis- 
tintos para producir soni- 
dos. 

«Megabasic» contiene, 
además de la ampliación, 
un segundo programa de- 
nominado «Megaspectrum 
Sprites» especialmente dise- 
ñado para el tratamiento de 
gráficos en pantalla. Po- 
drán definirse formas, colo- 
res, desplazamientos y velo- 
cidad de animación, visua- 
lizar las distintas secuencias 
de imágenes para la edición 
y corrección de las mismas. 

Las ventajas de esta po- 
tente utilidad son considera- 
bles dejándonos libres una 
vez almacenados los datos 
de unos 20 K de memoria. 



"GENS Y MONS" 

Estos dos programas de 
la compañía Hisoft son dos 
herramientas imprescindi- 
bles para todos aquellos 
que se inicien en el mundo 
de la programación. 

«Gens» es un poderoso 
ensamblador del Z80, el mi- 
croprocesador del Spec- 
trum; su principal caracterís- 
tica es la diferencia de ma- 
nejo respecto a otros en- 
sambladores disponibles, 
que le convierten en un pro- 
grama profesional por su 
extensión y sus amplias po- 
sibilidades. 

Un ensamblador, básica- 
mente es una herramienta 
que permite programar en 
Código Máquina de forma 
muy sencilla, trabajando de 
modo complementario con 
el relocalizoble desensam- 
blador Mons. Sustituye el 
árido sistema binario, por 
una serie de nemónicos, 
que constituyen el código 
fuente; el propio programa 
traslada a números este có- 
digo, que tras ensamblarlo 
se convierte en el código 



F3 

, PC 0759 

SP 9C0B 

IV SC3P 

IX 03D4 

HL 0000 

DE 0012 

BC 005 3 

fiF 0044 

IR 3F56 

FFF4 le 

FFF5 10 

FFF6 10 

FFF7 00 

FFFS 00 

FFF9 4.2 

FFFfl 4-2 

FFFB 4.2 

>M 



DI 

F3 22 27 

2B 2D 65 

FF CD 00 

04 0C 0D 

F3 «F 11 

15 FF FF 

El 6E FD 



rr^FC 42 

FFFD 42 

FFFE 3C 

FFFF 00 

>0000 F3< 

0001 «F 

0002 11 

0003 FF 



«F 2» 2E «F 

33 53 27 ED 

1F 9C OO 00 

20 FD 0E 3F 

FF FF C3 CB 

FF FF FF 2« 

75 00 ED 7B 



0004 FF 

0005 C3 

0006 CB 

0007 11 
CO0S 2« 
0009» 5D 
000A 5C 

22 
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objeto. El «Gens» es tam- 
bién totalmente reubicable, 
es decir, podemos hacer 
que funcione instalándolo 
en cualquier zona de la me- 
moria; esta es la ventaja 
que le sitúa por encima de 
otros ensambladores, ya 
que evita la posibilidad de 
que coincidan en una misma 
dirección el programa sobre 
el que trabajamos y el en- 
samblador o el desensam- 
blador. 

El «Gens» se caracteriza 
por la rapidez en la ejecu- 
ción, y añade otras venta- 
jas, como incluir un ensam- 
blado condicional, muchos 
comandos del ensamblador 
y una tabla de símbolos bi- 
naria. 



Muchas son las opciones 
de este ensamblador, pero 
como analizar detenida- 
mente cada una de ellas su- 
pondría escribir de nuevo 
un libro de instrucciones, co- 
mo el que acompaña a am- 
bos programas, nos limita- 
remos a señalar que algu- 
nas de ellas son: ensambla- 
je rápido, producir un lista- 
do de la tabla de símbolos, 
no generar ningún código 
objeto y dirigir el listado del 
ensamblador a la impreso- 
ra. 
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'THE COPE MACHINE" 



Todos los usuarios intere- 
sados en la programación 
en Código Máquina cono- 
cerán sin duda el popular 
paquete monitor/ensambla- 
dor Editas, de la casa 
Gremlins. Este paquete ha 
sido actualizado por esta 
misma compañía y ha dado 
lugar a la nueva versión 
3.1, que recibe el nombre 
globar de «The Code Ma- 
chine», pudiendo ser adap- 
tados ambos programas a 
casi todos los modelos de in- 
terface de impresora. 

El editor ensamblador 
trabaja en modo 40 colum- 
nas divididos en distintos 
campos. El primero permite 
introducir los comandos y 
renumerar las lineas; el se- 
gundo para la utilización de 
etiquetas; el tercero destina- 
do a los nemónicos y el últi- 
mo para operandos. Los co- 




mandos de edición más uti- 
lizados son: LIST, EDIT, 
AUTO, NEW, RETURN, 
RENUM y DELETE. 
El programa monitor nos 



permitirá estudiar y trabajar 
sobre nuestros propias ruti- 
nas reubicarlas o analizar 
las rutinas de otros progra- 
mas. 



Dos herramientas impres- 
cindibles para adentrarnos 
en el mundo de la progra- 
mación de una forma mu- 
cho más asequible. 



